in reply to Unique Character Combinations

The output order isn't the same, but... 
sub comb {
  glob(join '', map "{$_,}", @_);
}

[download]
See also Re^3: Generating powerset with progressive ordering
Caution: Contents may have been coded under pressure.

In Section Cool Uses for Perl