X7ROOT File Manager
Current Path:
/usr/share/perl5
usr
/
share
/
perl5
/
??
..
??
AnyDBM_File.pm
(2.56 KB)
??
Attribute
??
AutoLoader.pm
(15.43 KB)
??
AutoSplit.pm
(19.18 KB)
??
B
??
Benchmark.pm
(30.3 KB)
??
CORE.pod
(3.11 KB)
??
CPAN
??
Class
??
Compress
??
Config
??
DB.pm
(18.48 KB)
??
DBM_Filter
??
DBM_Filter.pm
(14.05 KB)
??
Devel
??
DirHandle.pm
(1.52 KB)
??
Dumpvalue.pm
(17.14 KB)
??
English.pm
(4.65 KB)
??
ExtUtils
??
File
??
FileCache.pm
(5.44 KB)
??
FileHandle.pm
(6.63 KB)
??
FindBin.pm
(4.45 KB)
??
Getopt
??
I18N
??
IO
??
IPC
??
Internals.pod
(2.52 KB)
??
Locale
??
Math
??
Memoize
??
Memoize.pm
(35.34 KB)
??
Module
??
NEXT.pm
(18.4 KB)
??
Net
??
PerlIO.pm
(10.21 KB)
??
Pod
??
Safe.pm
(24.49 KB)
??
Search
??
SelectSaver.pm
(1.05 KB)
??
SelfLoader.pm
(17.28 KB)
??
Symbol.pm
(4.69 KB)
??
Term
??
Test.pm
(29.35 KB)
??
Text
??
Thread
??
Thread.pm
(8.09 KB)
??
Tie
??
Time
??
UNIVERSAL.pm
(6.44 KB)
??
URI
??
URI.pm
(33.97 KB)
??
Unicode
??
User
??
XSLoader.pm
(11 KB)
??
_charnames.pm
(32.39 KB)
??
autouse.pm
(4.14 KB)
??
base.pm
(10.72 KB)
??
blib.pm
(2.04 KB)
??
bytes.pm
(3.67 KB)
??
bytes_heavy.pl
(758 B)
??
charnames.pm
(20.38 KB)
??
deprecate.pm
(3.01 KB)
??
diagnostics.pm
(18.59 KB)
??
dumpvar.pl
(15.19 KB)
??
encoding
??
feature.pm
(16.68 KB)
??
fields.pm
(9.27 KB)
??
filetest.pm
(3.91 KB)
??
if.pm
(3.26 KB)
??
integer.pm
(3.18 KB)
??
less.pm
(3.13 KB)
??
locale.pm
(4.74 KB)
??
meta_notation.pm
(2.07 KB)
??
open.pm
(7.83 KB)
??
overload
??
overload.pm
(52.06 KB)
??
overloading.pm
(1.77 KB)
??
perl5db.pl
(309 KB)
??
pod
??
sigtrap.pm
(7.43 KB)
??
sort.pm
(5.94 KB)
??
strict.pm
(4.63 KB)
??
subs.pm
(848 B)
??
unicore
??
utf8.pm
(8.9 KB)
??
utf8_heavy.pl
(30.87 KB)
??
vars.pm
(2.36 KB)
??
vendor_perl
??
vmsish.pm
(4.21 KB)
??
warnings
??
warnings.pm
(43.71 KB)
Editing: subs.pm
package subs; our $VERSION = '1.02'; =head1 NAME subs - Perl pragma to predeclare sub names =head1 SYNOPSIS use subs qw(frob); frob 3..10; =head1 DESCRIPTION This will predeclare all the subroutine whose names are in the list, allowing you to use them without parentheses even before they're declared. Unlike pragmas that affect the C<$^H> hints variable, the C<use vars> and C<use subs> declarations are not BLOCK-scoped. They are thus effective for the entire package in which they appear. You may not rescind such declarations with C<no vars> or C<no subs>. See L<perlmodlib/Pragmatic Modules> and L<strict/strict subs>. =cut require 5.000; sub import { my $callpack = caller; my $pack = shift; my @imports = @_; foreach my $sym (@imports) { *{"${callpack}::$sym"} = \&{"${callpack}::$sym"}; } }; 1;
Upload File
Create Folder