Select Code to Download

use strict;
use warnings;
...
use Algorithm::Loops qw(NestedLoops);

NestedLoops [([1..3]) x 5], sub { say @_ };

NestedLoops [[1..3], [1..5], [1..3]], sub { say @_ };