% perl -le 'print unpack N,pack C4,split\D,pop' 192.168.1.1 3221225472 % perl -le 'print join".",unpack C4,pack N,pop' 3232235777 192.168.1.1