Select Code to Download

use v5.12;
use warnings;
...
# probably better done with unpack
printf "%02X ",ord($_)
  for split //,$str;

"\\r\\n\\t\\tHello\\tWorld\n\$scl\@arr"
"\r\n\t\tHello\tWorld\n\$scl\@arr"
0D 0A 09 09 48 65 6C 6C 6F 09 57 6F 72 6C 64 0A 24 73 63 6C 40 61 72 7
+2