Anyone think it would be nice is Sys::Hostname did this itself? $ perl -MSys::Hostname -le 'print join ".", unpack "C*", (gethostbyname hostname)[4]' 195.82.114.220 $
perlfaq9, consulted belatedly, (requires Socket) $ perl -MSocket -MSys::Hostname -le 'print inet_ntoa(scalar gethostbyname hostname)' 195.82.114.220 $ Paul -- Paul Makepeace ....................................... http://paulm.com/ "If pickup sticks were how countries fought, then what colour is my house." -- http://paulm.com/toys/surrealism/