my @tags = split /\t/, $line;
my @Definition=("NN", "NNS");
next unless (grep {$_ eq $tags[ 1 ]} @Definition);