for my $i (0..$#b) {
    print "$i: $b[$i]" if $b[$i] eq $a[8];
}