$ perl -le " print unpack qw/H*/, $_ for @ARGV; " 1 aSdF82
31
615364463832