print hexize(@subnets), "\n"; sub hexize { return sprintf("%02x%02x%02x%02x", @_); }