Help for this page

Select Code to Download

Select or download this

my $n1 = $data->{n1};
my $n2 = $data->{n2};
for my $c (1..$n1) {
    $data->{"exclude-$c-$_"} = 'yes' for 1..$n2;
}

Select or download this

for my $c (1..$data->{n1}) {
 $data->{"exclude-$c-$_"} = 'yes' for 1..$data->{n2};
}