mit_index => sub { my $sum; for my $i ($start..$end) { $sum += $array[$i] ? 1 : -1 }; },