Beta Shell
v2.0 ยท web2.us.cloudlogin.co
[FM]
[CMD]
[PHP]
[DB]
[INFO]
[SEC]
File Manager
~
/
usr
/
share
/
perl5
/
vendor_perl
/
Module
/
Compile
Upload
4 items
Name
Size
Perms
Modified
Actions
[ .. / .. ]
Opt.pm
610 B
-rw-r--r--
2019-12-25 01:24:54
Edit
Del
Opt.pod
852 B
-rw-r--r--
2019-12-25 01:24:54
Edit
Del
Editing: Opt.pm
(610 B)
Path: /usr/share/perl5/vendor_perl/Module/Compile/Opt.pm
Back
use strict; use warnings; package Module::Compile::Opt; # TODO; What is this module for? # sub import { # my ($class, @args) = @_; # my $opts = $class->get_options(@args) # if $class->can('get_options'); # $class->sanity_check($opts); # require Module::Compile; # require Module::Compile::Ext; # Module::Compile::Ext->import(@{$opts->{ext}}); # # # put coderef into @INC # # Store PERL5OPT in .author # # In Module::Compile, complain if PERL5OPT != .author/PERL5OPT # } sub sanity_check { my $class = shift; die unless -e 'inc' and -e 'Makefile.PL'; } 1;