for my $i (1 .. 4) { #### for my $i (0 .. 4) { #### for $j($i+1..5){ #### for $j($i+1..4){