--- Net-IP-1.25/IP.pm.orig 2006-05-23 01:46:40.000000000 +0900 +++ Net-IP-1.25/IP.pm 2006-07-04 01:54:55.000000000 +0900 @@ -410,7 +410,7 @@ my $int = ip_bintoint($self->binip()); - if (!$int) { + if (ref($int) ne "Math::BigInt") { $self->{error} = $ERROR; $self->{errno} = $ERRNO; return;