Linux cpanel2.daytoncreative.net 2.6.32-754.29.2.el6.x86_64 #1 SMP Tue May 12 17:39:04 UTC 2020 x86_64
Apache/2.4.43 (cPanel) OpenSSL/1.1.1g mod_bwlimited/1.4
Server IP : 70.62.220.67 & Your IP : 216.73.216.193
Domains :
Cant Read [ /etc/named.conf ]
User : michaelgreg
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
var /
log /
perl-5.20.2 /
cpan /
Module-Load /
t /
to_load /
Delete
Unzip
Name
Size
Permission
Date
Action
Must
[ DIR ]
drwxr-xr-x
2015-02-14 16:55
LoadIt.pm
17
B
-r--r--r--
2014-12-27 11:48
LoadMe.pl
2
B
-r--r--r--
2014-12-27 11:48
TestModule.pm
1020
B
-r--r--r--
2014-12-27 11:48
ToBeLoaded
2
B
-r--r--r--
2014-12-27 11:48
config_file
771
B
-r--r--r--
2014-12-27 11:48
Save
Rename
package TestModule; use strict; require Exporter; use vars qw(@EXPORT @EXPORT_OK @ISA $IMPORTED); @ISA = qw(Exporter); @EXPORT = qw(func2); @EXPORT_OK = qw(func1); ### test if import gets called properly sub import { $IMPORTED = 1; ### this breaks on 5.8.[45] which have a bug with goto's losing ### arguments in @_. This is the cause of the 0.14 tester failures ### under 5.8.[45]. The bug is NOT in exporter, but core perl: ### http://testers.cpan.org/show/Module-Load.html #goto &Exporter::import; ### instead, use the undocumented, but widely used $ExportLevel ### which will make sure we pass all arguments, and even works ### on buggy 5.8.[45] do { local $Exporter::ExportLevel += 1; Exporter::import(@_) } } sub imported { $IMPORTED; } sub func1 { return "func1"; } sub func2 { return "func2"; } 1;