perl -le 'open F,">",\$f; {local($/,$\); print F "\n"}; print unpack "H*", $f'
0a