On Fri, May 07, 2004 at 04:36:43AM -0000, [EMAIL PROTECTED] wrote: > + # remove "www.fakehostname.com@" username part > + $host =~ s/[EMAIL PROTECTED]@//gs;
IMO, get_uri_list shouldn't remove that, that should be up to whoever's calling. > + # "http://0x7f000001/"; does http://00000x7f000001/ work? Just curious. > +sub decode_ulong_to_ip { > + my ($ulong) = @_; > + my @octets = (); > + unshift (@octets, $ulong & 0xff); $ulong >>= 8; > + unshift (@octets, $ulong & 0xff); $ulong >>= 8; > + unshift (@octets, $ulong & 0xff); $ulong >>= 8; > + unshift (@octets, $ulong & 0xff); > + return join (".", @octets); I don't know which is more efficient, but I always used (converted for this function): @octets = unpack("CCCC",pack("H*", sprintf "%08lx", $ulong)); -- Randomly Generated Tagline: When I die, I would like to go peacefully, in my sleep, like my Grandfather did. Not screaming and yelling like the passenger in his car.
pgpBcVxoyGyUb.pgp
Description: PGP signature
