$ perl -MSocket=inet_ntoa -le 'print inet_ntoa(pack("N",shift||2130706433))'
127.0.0.1
$ perl -MSocket=inet_ntoa -le 'print inet_ntoa(pack("N",shift||2130706433))' 3232235777
192.168.1.1