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 /
Memoize /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
array.t
1.41
KB
-r--r--r--
2014-12-27 11:48
array_confusion.t
771
B
-r--r--r--
2014-12-27 11:48
correctness.t
3.04
KB
-r--r--r--
2014-12-27 11:48
errors.t
1.38
KB
-r--r--r--
2014-12-27 11:48
expfile.t
1.32
KB
-r--r--r--
2014-12-27 11:48
expire.t
943
B
-r--r--r--
2014-12-27 11:48
expmod_n.t
1.1
KB
-r--r--r--
2014-12-27 11:48
expmod_t.t
2.36
KB
-r--r--r--
2014-12-27 11:48
flush.t
614
B
-r--r--r--
2014-12-27 11:48
normalize.t
1.38
KB
-r--r--r--
2014-12-27 11:48
prototype.t
570
B
-r--r--r--
2014-12-27 11:48
speed.t
2.99
KB
-r--r--r--
2014-12-27 11:48
tie.t
1.54
KB
-r--r--r--
2014-12-27 11:48
tie_gdbm.t
1.23
KB
-r--r--r--
2014-12-27 11:48
tie_ndbm.t
1.31
KB
-r--r--r--
2014-12-27 11:48
tie_sdbm.t
1.41
KB
-r--r--r--
2014-12-27 11:48
tie_storable.t
1.29
KB
-r--r--r--
2014-12-27 11:48
tiefeatures.t
1.18
KB
-r--r--r--
2014-12-27 11:48
unmemoize.t
520
B
-r--r--r--
2014-12-27 11:48
Save
Rename
#!/usr/bin/perl use lib '..'; use Memoize qw(memoize unmemoize); print "1..5\n"; eval { unmemoize('f') }; # Should fail print (($@ ? '' : 'not '), "ok 1\n"); { my $I = 0; sub u { $I++ } } memoize('u'); my @ur = (&u, &u, &u); print (("@ur" eq "0 0 0") ? "ok 2\n" : "not ok 2\n"); eval { unmemoize('u') }; # Should succeed print ($@ ? "not ok 3\n" : "ok 3\n"); @ur = (&u, &u, &u); print (("@ur" eq "1 2 3") ? "ok 4\n" : "not ok 4\n"); eval { unmemoize('u') }; # Should fail print ($@ ? "ok 5\n" : "not ok 5\n");