foreach $keye (@key_en)
{
$linb=`cat /home/vikash/pro_1/en_1000 | grep --regexp '$keye'`;

print "$linb\n";
}

##</code><code>##

foreach (@key_en)
{
$linb=`cat /home/vikash/pro_1/en_1000 | grep --regexp '$_'`;

print "$linb\n";
}