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

##</code><code>##

my ($i, $end) = ($j, $#array);
my $pos = 0;
for (; $i <= $end; $i++) {
   last if ($array[$i] eq 'blah');
   if ($i == $#array) {
        $i = 0;
        $end = $j - 1;
   }
}