Argument "^CM-^V" isn't numeric in numeric comparison (<=>) at ...

##</code><code>##

johngg@shiraz:~/perl/Monks > perl -MSocket -E '
> say ord for split m{}, inet_aton( q{192.168.45.92} );'
192
168
45
92
johngg@shiraz:~/perl/Monks > perl -E '
> say ord for split m{}, pack q{C4}, split m{\.}, q{192.168.45.92};'
192
168
45
92
johngg@shiraz:~/perl/Monks >