And for those unfortunate souls who get their IP addresses in unsigned, non-delimited hex (ala SNMP agents):

sub hex2ip { return join(".", map {hex($_)} unpack('A2 A2 A2 A2',shift
+)) }
[download]

---

"Non sequitur. Your facts are un-coordinated." - Nomad