Re^2: Multiple Permutation handling

[kcott]

in reply to Re: Multiple Permutation handling
in thread Multiple Permutation handling

I was wondering why you added hyphens to the glob string and then added a map function to remove them. It seems like a lot of additional processing that has no real value: perhaps I'm missing something.

This code produces the same output that you posted:

use strict;
use warnings;

my $sku   = join ',', qw/SKU1 SKU2 SKU3/;
my $tslh  = join ',', qw/T S L H/;
my $size  = join ',', qw/S M L XL 2X /;
my $color = join ',', qw/BLU GRN WHT BLK/;

print "$_\n" for glob "{$sku}{$tslh}{$size}{$color}";

[Kenosis]

...perhaps I'm missing something.

No, you haven't missed anything. I did unnecessarily add elements and processes. Good catch! ++