in reply to Re: Combinatorics in Perlin thread Combinatorics in Perl
perl -e'$_="nwdd\x7F^n\x7Flm{{llql0}qs\x14";s/./chr(ord$&^30)/ge;print'