perl -wE 'use open IN => ":raw"; while (<>) { /(\R)/; say (unpack "H*", $1); }' file