Help for this page
for my $nnot ( map { $solution[-1] + $_, $solution[-1] - $_ } grep { $availableIntervals[$_] > 0 } (1 .. 11) ) {
for my $nnot ( map { ... : () } (1 .. 11) ) {