An input file is worth a thousand words - I think I understand your description of the problem, but would be a lot more confident if I could read Texts.txt. See How do I post a question effectively?.

You potentially have some issues because you are relying on synchronized arrays - these can result in headaches when one array is updated but another is not. But proselytizing aside, if you'd like to scan through what I am assuming is your structure, you can do so with a pair of nested for loops, like

foreach my $i (0 .. $#txtoken) {
    foreach my $j (0 .. $#{txtoken[$i]}) {
        if ($txtoken[$i][$j] eq "temeli" and $pstoken[$i][$j] eq "n") 
+{
            print "$tx[$i]\n" ;
        }
    }
}
[download]

Note I've used a string-comparison operator eq to check for string equivalence: eq, == and = mean different things.