Branch Coverage

blib/lib/Geo/IP2Location.pm
Criterion Covered Total %
branch 101 530 19.0


line true false branch
168 0 2 unless (@_ > bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $_[1])
175 0 2 unless (CORE::open $handle, "$db_file")
182 0 2 if ($obj->{'productcode'} == {sign => '+', value => ['1']}) { }
184 2 0 if ($obj->{'databaseyear'} <= {sign => '+', value => ['20']} and $obj->{'productcode'} == {sign => '+', value => ['0']}) { }
197 0 0 if (CORE::close $class->{'filehandle'}) { }
243 10 10 if ($ipv == {sign => '+', value => ['4']}) { }
246 10 0 if ($ipv == {sign => '+', value => ['6']}) { }
258 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
261 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
273 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
276 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
288 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
291 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
303 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
306 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
318 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
321 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
333 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
336 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
348 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
351 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
363 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
366 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
378 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
381 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
393 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
396 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
408 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
411 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
423 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
426 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
438 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
441 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
453 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
456 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
468 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
471 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
483 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
486 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
498 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
501 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
513 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
516 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
528 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
531 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
543 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
546 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
558 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
561 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
573 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
576 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
588 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
591 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
603 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
606 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
618 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
621 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
633 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
636 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
648 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
651 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
663 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
666 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
680 0 10 if ($ipnum eq "")
681 0 0 if ($mode == {sign => '+', value => ['100']}) { }
688 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_COUNTRY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
691 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_COUNTRY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
694 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_REGION_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
697 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_CITY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
700 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_ISP_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
703 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_LATITUDE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
706 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_LONGITUDE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
709 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_DOMAIN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
712 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_ZIPCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
715 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_TIMEZONE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
718 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_NETSPEED_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
721 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_IDDCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
724 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_AREACODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
727 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_WEATHERSTATIONCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
730 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_WEATHERSTATIONNAME_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
733 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_MCC_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
736 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_MNC_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
739 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_MOBILEBRAND_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
742 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_ELEVATION_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
745 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_USAGETYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
748 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_ADDRESSTYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
751 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_CATEGORY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
754 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_DISTRICT_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
757 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_ASN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
760 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_AS_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
763 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [26], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_AS_DOMAIN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
766 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [27], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_AS_USAGETYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
769 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [28], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IPV6_AS_CIDR_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
780 0 10 if ($dbcount == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
781 0 0 if ($mode == {sign => '+', value => ['100']}) { }
795 10 0 if ($indexbaseaddr > bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
805 0 10 if ($realipno == "340282366920938463463374607431768211455")
815 10 94 if ($ipno >= $ipfrom and $ipno < $ipto) { }
818 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [100], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
848 0 0 if ($IPV6_COUNTRY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
852 0 0 if ($IPV6_REGION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
855 0 0 if ($IPV6_CITY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
858 0 0 if ($IPV6_ISP_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
861 0 0 if ($IPV6_LATITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
865 0 0 if ($IPV6_LONGITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
869 0 0 if ($IPV6_DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
872 0 0 if ($IPV6_ZIPCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
875 0 0 if ($IPV6_TIMEZONE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
878 0 0 if ($IPV6_NETSPEED_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
881 0 0 if ($IPV6_IDDCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
884 0 0 if ($IPV6_AREACODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
887 0 0 if ($IPV6_WEATHERSTATIONCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
890 0 0 if ($IPV6_WEATHERSTATIONNAME_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
893 0 0 if ($IPV6_MCC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
896 0 0 if ($IPV6_MNC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
899 0 0 if ($IPV6_MOBILEBRAND_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
902 0 0 if ($IPV6_ELEVATION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
905 0 0 if ($IPV6_USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
908 0 0 if ($IPV6_ADDRESSTYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
911 0 0 if ($IPV6_CATEGORY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
914 0 0 if ($IPV6_DISTRICT_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
917 0 0 if ($IPV6_ASN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
920 0 0 if ($IPV6_AS_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
923 0 0 if ($IPV6_AS_DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
926 0 0 if ($IPV6_AS_USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
929 0 0 if ($IPV6_AS_CIDR_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
934 10 0 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
937 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
940 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
943 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
946 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
949 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
954 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
959 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
962 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
965 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
968 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
971 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
974 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
977 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
980 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
983 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
986 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
989 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
992 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
995 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
998 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1001 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1004 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1007 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1010 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1013 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [26], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1016 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [27], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1019 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [28], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1023 82 12 if ($ipno < $ipfrom) { }
1030 0 0 if ($mode == {sign => '+', value => ['100']}) { }
1043 0 10 if ($ipnum eq "")
1044 0 0 if ($mode == {sign => '+', value => ['100']}) { }
1051 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $COUNTRY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1054 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $COUNTRY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1057 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $REGION_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1060 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $CITY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1063 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ISP_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1066 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $LATITUDE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1069 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $LONGITUDE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1072 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $DOMAIN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1075 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ZIPCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1078 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $TIMEZONE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1081 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $NETSPEED_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1084 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $IDDCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1087 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $AREACODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1090 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $WEATHERSTATIONCODE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1093 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $WEATHERSTATIONNAME_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1096 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $MCC_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1099 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $MNC_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1102 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $MOBILEBRAND_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1105 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ELEVATION_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1108 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $USAGETYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1111 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ADDRESSTYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1114 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $CATEGORY_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1117 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $DISTRICT_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1120 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ASN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1123 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $AS_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1126 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [26], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $AS_DOMAIN_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1129 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [27], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $AS_USAGETYPE_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1132 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [28], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $AS_CIDR_POSITION[$dbtype] == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1148 10 0 if ($indexbaseaddr > bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1156 0 10 if ($realipno == {sign => '+', value => [294967295, 4]}) { }
1169 10 5 if ($ipno >= $ipfrom and $ipno < $ipto) { }
1170 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [100], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1200 0 0 if ($COUNTRY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1205 0 0 if ($REGION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1208 0 0 if ($CITY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1211 0 0 if ($ISP_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1214 0 0 if ($LATITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1218 0 0 if ($LONGITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1222 0 0 if ($DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1225 0 0 if ($ZIPCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1228 0 0 if ($TIMEZONE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1231 0 0 if ($NETSPEED_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1234 0 0 if ($IDDCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1237 0 0 if ($AREACODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1240 0 0 if ($WEATHERSTATIONCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1243 0 0 if ($WEATHERSTATIONNAME_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1246 0 0 if ($MCC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1249 0 0 if ($MNC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1252 0 0 if ($MOBILEBRAND_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1255 0 0 if ($ELEVATION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1258 0 0 if ($USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1261 0 0 if ($ADDRESSTYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1264 0 0 if ($CATEGORY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1267 0 0 if ($DISTRICT_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1270 0 0 if ($ASN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1273 0 0 if ($AS_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1276 0 0 if ($AS_DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1279 0 0 if ($AS_USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1282 0 0 if ($AS_CIDR_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1288 10 0 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1291 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1294 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1297 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1300 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1303 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1308 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1313 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1316 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1319 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1322 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1325 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1328 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1331 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1334 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1337 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1340 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1343 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1346 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1349 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1352 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1355 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1358 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1361 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1364 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1367 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [26], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1370 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [27], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1373 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [28], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1377 4 1 if ($ipno < $ipfrom) { }
1384 0 0 if ($mode == {sign => '+', value => ['100']}) { }
1474 0 0 if ($is_little_endian =~ /^1/) { }
1486 0 208 if $#array != bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' )
1509 10 10 if ($obj->ip_is_ipv4($ip)) { }
1516 10 0 if ($obj->ip_is_ipv6($ip)) { }
1522 0 10 if ($ipnum >= bless( {"sign" => "+","value" => bless( [681743360,281470], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ipnum <= bless( {"sign" => "+","value" => bless( [976710655,281474], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1528 0 10 if ($ipnum >= bless( {"sign" => "+","value" => bless( [629466624,178886921,834377588,545680458,42], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ipnum <= bless( {"sign" => "+","value" => bless( [958686719,807417417,692912415,550872755,42], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1537 0 10 if ($ipnum >= bless( {"sign" => "+","value" => bless( [300246528,550356425,975842760,540488161,42], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $ipnum <= bless( {"sign" => "+","value" => bless( [844196863,814694018,204005274,540488241,42], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1561 0 10 if ($ip[$#ip] =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/)
1569 0 10 if ($#ip == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1575 80 0 if length $ip[$_] > bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' )
1580 80 0 unless $ip[$_] eq "000Z"
1595 0 10 unless (length $hexip == bless( {"sign" => "+","value" => bless( [32], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1603 56 1224 if $_
1627 20 0 if ($host =~ /^$IPv4_re$/ or $host =~ /^$IPv6_re$/ or $host =~ /^\:\:$/) { }
1632 0 0 if ($#hostname < {sign => '+', value => ['4']}) { }
1644 10 10 if ($ip =~ /^$IPv4_re$/) { }
1647 0 40 if $octet[$i] > bless( {"sign" => "+","value" => bless( [255], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) or $octet[$i] < bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' )
1658 10 0 if ($ip =~ /^$IPv6_re$/ or $ip =~ /^$IPv4_re$/ or $ip =~ /^\:\:$/) { }