my $pos;
for my $i (0 .. $#array)
{
    next unless $array[$i] == 7;
    $pos = i; 
    last;
}

## do something with $pos.