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 'flush_cache', 'memoize'; print "1..8\n"; print "ok 1\n"; my $V = 100; sub VAL { $V } memoize 'VAL'; print "ok 2\n"; my $c1 = VAL(); print (($c1 == 100) ? "ok 3\n" : "not ok 3\n"); $V = 200; $c1 = VAL(); print (($c1 == 100) ? "ok 4\n" : "not ok 4\n"); flush_cache('VAL'); $c1 = VAL(); print (($c1 == 200) ? "ok 5\n" : "not ok 5\n"); $V = 300; $c1 = VAL(); print (($c1 == 200) ? "ok 6\n" : "not ok 6\n"); flush_cache(\&VAL); $c1 = VAL(); print (($c1 == 300) ? "ok 7\n" : "not ok 7\n"); $V = 400; $c1 = VAL(); print (($c1 == 300) ? "ok 8\n" : "not ok 8\n");