my $netip = new Net::IP ($ip) or die (Net::IP::Error()); my $intip = $netip->intip(); # output $intip # bless( { 'value' => [ 5050079, 291 ], 'sign' => '+' }, 'Math::BigInt' );