Re^3: sending a scalar to the interpreter as a command

[Kenosis]

What I want is this: 67-41-92, 67-41-42, 67-41-67, 67-41-28 ...

glob can help with this:

use strict;
use warnings;

my $a = join ',', qw/67 42 99 28 15 14 92 12 45 57 16/;
my $b = join ',', qw/41 99 67 28 15 57 12 45 14 92 12/;
my $c = join ',', qw/92 42 67 28 15 45 57 16 12 99 14/;

print "$_\n" for glob "{$a}-{$b}-{$c}";

Output:

67-41-92
67-41-42
67-41-67
67-41-28
...
16-12-16
16-12-12
16-12-99
16-12-14

[cord-bin]

Beautiful use of glob, I love it, thank you Kenosis!

[Kenosis]

You're most welcome, cord-bin!

[cord-bin]

Thank you, I'll keep coming here, a lot to learn and huge resource in here. Cheers.