NextPermute of Algorithm::Loops will do the trick, and it even has code that considers duplicate letters to be the same so you won't get "tool" twice while asking for permutations of "loot" (for example).