Windows NT KAMIDAKI 10.0 build 19045 (Windows 10) AMD64
Apache/2.4.58 (Win64) OpenSSL/3.1.3 PHP/8.3.9
Server IP : 192.168.3.16 & Your IP : 216.73.216.140
Domains :
Cant Read [ /etc/named.conf ]
User : SISTEMA
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
C: /
xampp /
perl /
vendor /
lib /
Math /
Int64 /
Delete
Unzip
Name
Size
Permission
Date
Action
die_on_overflow.pm
701
B
-rw-rw-rw-
2016-01-04 11:07
native_if_available.pm
746
B
-rw-rw-rw-
2016-01-04 11:07
Save
Rename
package Math::Int64::die_on_overflow; use strict; use warnings; use Math::Int64 (); sub import { require Math::Int64; Math::Int64::_set_may_die_on_overflow(1); $^H{'Math::Int64::die_on_overflow'} = 1; goto &Math::Int64::_check_pragma_compatibility; } sub unimport { undef $^H{'Math::Int64::die_on_overflow'} } 1; # ABSTRACT: catch overflows when using Math::Int64 __END__ =encoding UTF-8 =head1 NAME Math::Int64::die_on_overflow - catch overflows when using Math::Int64 =head1 SYNOPSIS use Math::Int64 qw(uint64); use Math::Int64::die_on_overflow; my $number = uint64(2**32); say($number * $number); # overflow error! =head1 SEE ALSO L<Math::Int64>. =cut