perl: Add `permutation.pl'