/usr/bin/perl -v This is perl 5, version 38, subversion 2 (v5.38.2) built for x86_64-linux-gnu-thread-multi /usr/bin/perl -E 'srand(80085);say(join("",map({g($_)}("3f5a64711350615c5b4f5867114c5666521f59535b604e57"=~m/../g))));sub g($num){chr(hex($num)+int(rand(31)));}' Just another Perl hacker