Linux sagir-us1.hostever.us 5.14.0-570.51.1.el9_6.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Oct 8 09:41:34 EDT 2025 x86_64
LiteSpeed
Server IP : 104.247.108.91 & Your IP : 216.73.216.105
Domains : 74 Domain
User : georgeto
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
lib64 /
perl5 /
vendor_perl /
NetAddr /
IP /
Delete
Unzip
Name
Size
Permission
Date
Action
InetBase.pm
18.77
KB
-rw-r--r--
2012-10-02 20:43
Lite.pm
42.9
KB
-rw-r--r--
2016-03-26 00:36
Util.pm
22
KB
-rw-r--r--
2015-08-17 22:19
UtilPP.pm
15.35
KB
-rw-r--r--
2012-08-10 18:43
Util_IS.pm
728
B
-rw-r--r--
2022-02-11 16:57
Save
Rename
#!/usr/bin/perl # # DO NOT ALTER THIS FILE # IT IS WRITTEN BY Makefile.PL # EDIT THAT INSTEAD # package NetAddr::IP::Util_IS; use vars qw($VERSION); $VERSION = 1.00; sub pure { return 0; } sub not_pure { return 1; } 1; __END__ =head1 NAME NetAddr::IP::Util_IS - Tell about Pure Perl =head1 SYNOPSIS use NetAddr::IP::Util_IS; $rv = NetAddr::IP::Util_IS->pure; $rv = NetAddr::IP::Util_IS->not_pure; =head1 DESCRIPTION Util_IS indicates whether or not B<NetAddr::IP::Util> was compiled in Pure Perl mode. =over 4 =item * $rv = NetAddr::IP::Util_IS->pure; Returns true if PurePerl mode, else false. =item * $rv = NetAddr::IP::Util_IS->not_pure; Returns true if NOT PurePerl mode, else false =back =cut 1;