sub ip2hex{ return "0x" . join ("", map {sprintf "%x", $_} split(/\./,shift)); + } [download]
In reply to Converting numeric IP address to hex by Coyote