$ perl -le 'print join(".",unpack("C4",pack("N",shift)))' 3232235777
192.168.1.1
$ perl -le 'print unpack("N",pack("C4",split(/\./,shift)))' 192.168.1.1                             
3232235777