Branch Coverage

blib/lib/Geo/IP2Location.pm
Criterion Covered Total %
branch 95 482 19.7


line true false branch
159 0 2 unless (@_ > bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ) and $_[1])
166 0 2 unless (CORE::open $handle, "$db_file")
173 0 2 if ($obj->{'productcode'} == {sign => '+', value => ['1']}) { }
175 2 0 if ($obj->{'databaseyear'} <= {sign => '+', value => ['20']} and $obj->{'productcode'} == {sign => '+', value => ['0']}) { }
188 0 0 if (CORE::close $class->{'filehandle'}) { }
234 10 10 if ($ipv == {sign => '+', value => ['4']}) { }
237 10 0 if ($ipv == {sign => '+', value => ['6']}) { }
249 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
252 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
264 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
267 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
279 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
282 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
294 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
297 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
309 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
312 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
324 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
327 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
339 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
342 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
354 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
357 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
369 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
372 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
384 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
387 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
399 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
402 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
414 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
417 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
429 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
432 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
444 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
447 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
459 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
462 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
474 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
477 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
489 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
492 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
504 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
507 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
519 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
522 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
534 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
537 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
549 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
552 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
564 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
567 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
579 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
582 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
594 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
597 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
609 0 0 if ($ipv == {sign => '+', value => ['4']}) { }
612 0 0 if ($ipv == {sign => '+', value => ['6']}) { }
626 0 10 if ($ipnum eq "")
627 0 0 if ($mode == {sign => '+', value => ['100']}) { }
634 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' ))
637 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' ))
640 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' ))
643 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' ))
646 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' ))
649 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' ))
652 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' ))
655 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' ))
658 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' ))
661 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' ))
664 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' ))
667 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' ))
670 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' ))
673 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' ))
676 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' ))
679 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' ))
682 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' ))
685 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' ))
688 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' ))
691 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' ))
694 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' ))
697 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' ))
700 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' ))
703 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' ))
706 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' ))
717 0 10 if ($dbcount == bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
718 0 0 if ($mode == {sign => '+', value => ['100']}) { }
732 10 0 if ($indexbaseaddr > bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
742 0 10 if ($realipno == "340282366920938463463374607431768211455")
752 10 94 if ($ipno >= $ipfrom and $ipno < $ipto) { }
755 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [100], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
782 0 0 if ($IPV6_COUNTRY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
786 0 0 if ($IPV6_REGION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
789 0 0 if ($IPV6_CITY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
792 0 0 if ($IPV6_ISP_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
795 0 0 if ($IPV6_LATITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
799 0 0 if ($IPV6_LONGITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
803 0 0 if ($IPV6_DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
806 0 0 if ($IPV6_ZIPCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
809 0 0 if ($IPV6_TIMEZONE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
812 0 0 if ($IPV6_NETSPEED_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
815 0 0 if ($IPV6_IDDCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
818 0 0 if ($IPV6_AREACODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
821 0 0 if ($IPV6_WEATHERSTATIONCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
824 0 0 if ($IPV6_WEATHERSTATIONNAME_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
827 0 0 if ($IPV6_MCC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
830 0 0 if ($IPV6_MNC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
833 0 0 if ($IPV6_MOBILEBRAND_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
836 0 0 if ($IPV6_ELEVATION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
839 0 0 if ($IPV6_USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
842 0 0 if ($IPV6_ADDRESSTYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
845 0 0 if ($IPV6_CATEGORY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
848 0 0 if ($IPV6_DISTRICT_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
851 0 0 if ($IPV6_ASN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
854 0 0 if ($IPV6_AS_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
860 10 0 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
863 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
866 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
869 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
872 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
875 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
880 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
885 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
888 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
891 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
894 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
897 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
900 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
903 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
906 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
909 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
912 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
915 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
918 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
921 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
924 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
927 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
930 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
933 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
936 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
940 82 12 if ($ipno < $ipfrom) { }
947 0 0 if ($mode == {sign => '+', value => ['100']}) { }
960 0 10 if ($ipnum eq "")
961 0 0 if ($mode == {sign => '+', value => ['100']}) { }
968 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' ))
971 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' ))
974 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' ))
977 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' ))
980 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' ))
983 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' ))
986 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' ))
989 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' ))
992 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' ))
995 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' ))
998 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' ))
1001 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' ))
1004 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' ))
1007 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' ))
1010 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' ))
1013 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' ))
1016 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' ))
1019 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' ))
1022 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' ))
1025 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' ))
1028 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' ))
1031 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' ))
1034 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' ))
1037 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' ))
1040 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' ))
1056 10 0 if ($indexbaseaddr > bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1064 0 10 if ($realipno == {sign => '+', value => [294967295, 4]}) { }
1077 10 5 if ($ipno >= $ipfrom and $ipno < $ipto) { }
1078 0 10 if ($mode == bless( {"sign" => "+","value" => bless( [100], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1105 0 0 if ($COUNTRY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1110 0 0 if ($REGION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1113 0 0 if ($CITY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1116 0 0 if ($ISP_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1119 0 0 if ($LATITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1123 0 0 if ($LONGITUDE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1127 0 0 if ($DOMAIN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1130 0 0 if ($ZIPCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1133 0 0 if ($TIMEZONE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1136 0 0 if ($NETSPEED_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1139 0 0 if ($IDDCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1142 0 0 if ($AREACODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1145 0 0 if ($WEATHERSTATIONCODE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1148 0 0 if ($WEATHERSTATIONNAME_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1151 0 0 if ($MCC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1154 0 0 if ($MNC_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1157 0 0 if ($MOBILEBRAND_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1160 0 0 if ($ELEVATION_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1163 0 0 if ($USAGETYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1166 0 0 if ($ADDRESSTYPE_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1169 0 0 if ($CATEGORY_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1172 0 0 if ($DISTRICT_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1175 0 0 if ($ASN_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1178 0 0 if ($AS_POSITION[$dbtype] != bless( {"sign" => "+","value" => bless( [0], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1184 10 0 if ($mode == bless( {"sign" => "+","value" => bless( [1], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1187 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [2], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1190 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1193 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [4], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1196 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [5], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1199 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [6], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1204 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [7], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1209 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1212 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [9], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1215 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [10], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1218 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [11], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1221 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [12], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1224 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [13], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1227 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [14], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1230 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1233 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [16], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1236 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [17], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1239 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [18], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1242 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [19], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1245 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [20], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1248 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [21], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1251 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [22], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1254 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [23], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1257 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [24], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1260 0 0 if ($mode == bless( {"sign" => "+","value" => bless( [25], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1264 4 1 if ($ipno < $ipfrom) { }
1271 0 0 if ($mode == {sign => '+', value => ['100']}) { }
1361 0 0 if ($is_little_endian =~ /^1/) { }
1373 0 208 if $#array != bless( {"sign" => "+","value" => bless( [15], 'Math::BigInt::Calc' )}, 'Math::BigInt' )
1396 10 10 if ($obj->ip_is_ipv4($ip)) { }
1403 10 0 if ($obj->ip_is_ipv6($ip)) { }
1409 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' ))
1415 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' ))
1424 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' ))
1448 0 10 if ($ip[$#ip] =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/)
1456 0 10 if ($#ip == bless( {"sign" => "+","value" => bless( [8], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1462 80 0 if length $ip[$_] > bless( {"sign" => "+","value" => bless( [3], 'Math::BigInt::Calc' )}, 'Math::BigInt' )
1467 80 0 unless $ip[$_] eq "000Z"
1482 0 10 unless (length $hexip == bless( {"sign" => "+","value" => bless( [32], 'Math::BigInt::Calc' )}, 'Math::BigInt' ))
1490 56 1224 if $_
1514 20 0 if ($host =~ /^$IPv4_re$/ or $host =~ /^$IPv6_re$/ or $host =~ /^\:\:$/) { }
1519 0 0 if ($#hostname < {sign => '+', value => ['4']}) { }
1531 10 10 if ($ip =~ /^$IPv4_re$/) { }
1534 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' )
1545 10 0 if ($ip =~ /^$IPv6_re$/ or $ip =~ /^$IPv4_re$/ or $ip =~ /^\:\:$/) { }