binmode FH, ':raw';

##</code><code>##

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

##</code><code>##

    perl -Mopen=IN,:raw -wnE '/(\R)/; say unpack "H*", $1' file