Help for this page
perl -le '$lo = 127.0.0.1; $l = (gethostbyname("localhost"))[4];print +"yup" if $lo eq $l' yup
perl -le 'printf "%vd\n", (gethostbyname("localhost"))[4]' 127.0.0.1