Select Code to Download

$ PERL_HASH_SEED_DEBUG=1 perl -e1
HASH_SEED = 12018612040932336001 
...
HASH_SEED = 4459772231957961225

...

#!/usr/bin/perl

...
if (++$ENV{PERL_INVOCATION_COUNT} < 100 ) {
    exec $0;
}