% perl -MSocket -e 'print inet_aton shift' 65.0.0.65|hexdump
0000000 0041 4100
0000004
% perl -MSocket -e 'print inet_aton shift' 65.65|hexdump
0000000 0041 4100
0000004