Re^2: Simple way to create a rainbow table

Or avoiding code duplication:

use strict;
use warnings;
use 5.010;
use Algorithm::Loops qw/NestedLoops/;

my @letters = ( 0 .. 9, 'a' .. 'z' );

NestedLoops(
    [ (\@letters) x 8 ],
    sub { say @_ }
);
[download]

Perl 6 - second systems done right

Comment on Re^2: Simple way to create a rainbow table Download Code