Select Code to Download

$ cat pm_11133064_pack_test.pl
use warnings;
...

    system $^X, '-wle', "print unpack('H*', $s);";
}

$ perl pm_11133064_pack_test.pl
OS: cygwin; Perl: v5.32.0;
...
4003333333333333
TEMPLATE: D
Invalid type 'D' in pack at pm_11133064_pack_test.pl line 11.

$ perl pm_11133064_pack_test.pl
OS: cygwin; Perl: v5.34.0;
...
Can't find string terminator "'" anywhere before EOF at -e line 1.
TEMPLATE: D>
Can't find string terminator "'" anywhere before EOF at -e line 1.