Select Code to Download

my $pos = 0;
for ($j .. $#array) {
    if ($array[$_] eq 'blah') {
...
        last;
    }
}

my ($i, $end) = ($j, $#array);
my $pos = 0;
for (; $i <= $end; $i++) {
...
        $end = $j - 1;
   }
}