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 ...`;
with
print "grep ..."
and observe if the regexp is what you expect
Then substitute the same line with
system("echo grep ..."); system("grep ...");
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
In reply to Re: shell commands doesn't integrate with perl
by jethro
in thread shell commands doesn't integrate with perl
by vikashiiitdm
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |