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;
   }
}