Algorithm::Permute::permute { print "@array\n" } @array; [download]
In reply to Re: More effective way of doing this by holli in thread More effective way of doing this by bisimen