Permuting using any number of given chars

I can use Algorithm::Permute to output all permutations of 1 2 3

123
132
312
213
231
321


But what I'm looking for is all possible permutations using any number of
the input chars.

Like this -

1
2
3
12
13
21
23
31
32
123
132
312
213
231
321


I can't think of a way right now and I can't find a module that does it.
Any ideas?



--
Brian Wakem

.

Relevant Pages