Help for this page
perl -wTe '() = unpack $ARGV[0], 1e9;' p
perl -wTe '$z = pack "p", "hi\n"; $r = unpack $ARGV[0], $z; eval $r;' +p