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 /
Locale-Codes /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
alias_code.t
1.81
KB
-r--r--r--
2014-12-27 11:48
alias_code_old.t
1.8
KB
-r--r--r--
2014-12-27 11:48
code2country.t
2.03
KB
-r--r--r--
2014-12-27 11:48
code2country_old.t
1.99
KB
-r--r--r--
2014-12-27 11:48
code2currency.t
1.39
KB
-r--r--r--
2014-12-27 11:48
code2langext.t
939
B
-r--r--r--
2014-12-27 11:48
code2langfam.t
936
B
-r--r--r--
2014-12-27 11:48
code2language.t
1.89
KB
-r--r--r--
2014-12-27 11:48
code2langvar.t
940
B
-r--r--r--
2014-12-27 11:48
code2script.t
1.01
KB
-r--r--r--
2014-12-27 11:48
country.t
5.42
KB
-r--r--r--
2014-12-27 11:48
country2code.t
2.24
KB
-r--r--r--
2014-12-27 11:48
country2code_old.t
1.87
KB
-r--r--r--
2014-12-27 11:48
country_code2code.t
1.71
KB
-r--r--r--
2014-12-27 11:48
country_code2code_old.t
1.71
KB
-r--r--r--
2014-12-27 11:48
country_old.t
5.27
KB
-r--r--r--
2014-12-27 11:48
currency2code.t
1.11
KB
-r--r--r--
2014-12-27 11:48
currency2code_old.t
1.11
KB
-r--r--r--
2014-12-27 11:48
langext2code.t
943
B
-r--r--r--
2014-12-27 11:48
langfam2code.t
940
B
-r--r--r--
2014-12-27 11:48
language.t
2.42
KB
-r--r--r--
2014-12-27 11:48
language2code.t
1.4
KB
-r--r--r--
2014-12-27 11:48
language_old.t
2.38
KB
-r--r--r--
2014-12-27 11:48
langvar2code.t
944
B
-r--r--r--
2014-12-27 11:48
script2code.t
1017
B
-r--r--r--
2014-12-27 11:48
script2code_old.t
1014
B
-r--r--r--
2014-12-27 11:48
testfunc.pl
12.37
KB
-r--r--r--
2014-12-27 11:48
Save
Rename
#!/usr/bin/perl -w require 5.002; $runtests=shift(@ARGV); if ( -f "t/testfunc.pl" ) { require "t/testfunc.pl"; $dir="./lib"; $tdir="t"; } elsif ( -f "testfunc.pl" ) { require "testfunc.pl"; $dir="../lib"; $tdir="."; } else { die "ERROR: cannot find testfunc.pl\n"; } unshift(@INC,$dir); use Locale::Codes::LangVar; %type = ( "LOCALE_LANGVAR_ALPHA" => LOCALE_LANGVAR_ALPHA, ); sub test { my(@test) = @_; $test[1] = $type{$test[1]} if (@test == 2 && $test[1] && exists $type{$test[1]}); return code2langvar(@test); } $tests = " zzz ~ _undef_ arevela ~ Eastern Armenian "; print "code2langvar...\n"; test_Func(\&test,$tests,$runtests); 1; # Local Variables: # mode: cperl # indent-tabs-mode: nil # cperl-indent-level: 3 # cperl-continued-statement-offset: 2 # cperl-continued-brace-offset: 0 # cperl-brace-offset: 0 # cperl-brace-imaginary-offset: 0 # cperl-label-offset: -2 # End: