- or download this
$ perl -e" binmode STDOUT; $|=1; print qq[\x0d\x0a]; " | od -tx1
0000000 0d 0a
0000002
- or download this
$ perl -e" binmode STDOUT; $|=1; print qq[\x0d\x0a]; " | perl -e" use
+open qw/ IN :crlf OUT :raw /; print join q/ /, unpack q/H*/, scalar<>
+; "
0d0a
- or download this
$ perl -v
This is perl 5, version 14, subversion 2 (v5.14.2) built for i686-linu
+x-gnu-thread-multi-64int