First of all you should remove the \n from files you read from disk (perl doesn't remove newlines from files it reads automatically. Because of that it can read binary files with the same commands). Add "chomp(@lines);" after "@lines=<HANDLE>". Maybe this was the problem you had with a lot of your scripts lately

I assume your grep doesn't find anything. I would suggest two tests. First substitute

$eng_dat=`grep ...`;
[download]

with

print "grep ..."
[download]

and observe if the regexp is what you expect

Then substitute the same line with

system("echo grep ..."); system("grep ...");
[download]

Now you should see what the shell makes of your command and get the output directly on STDOUT

Somewhere along these tests you should see a discrepancy. Or your search strings are really not in those files