Hi All

I want to search a string from an array in Perl. If a match occurs, assign that string to a variable else assign 'No match'. I tried writing the script as follows but it's in vain. Please help me..

 #!/usr/bin/perl
    use strict;

    my $NER;
    my @text=("ORG","PER");

   my @NES=("I-PER","I-TIM","LOC","MISC","ORG","PER");

    for(my $k=1; $k<=29; $k++)
    {
        if ($text[0] eq $NES[k])
        {
                $NER = $text[0];
        }
        else
        {
                $NER="No Match";
        }
    }
  print $NER;