Help for this page
my ($s,$e) = unpack 'N2',1.2.3.4 . 1.2.4.2; printf("%vd\n",pack 'N',$_) for ($s..$e)
sub ip_to_num { my $ip = shift; ... $n = $n*256+$_ for (split /\./,$ip); $n }
www.com | www.net | www.org
No recent polls found