in reply to search for a pattern in file without opening the file
If you don't want to open the files in your code you could use a system call.
as long as its a simple pattern.my $success = ( system("grep $searchpat $file >/dev/null") ) ? 0 : 1;
Ted
--
"That which we persist in doing becomes easier, not that the task itself has become easier, but that our ability to perform it has improved."
--Ralph Waldo Emerson
--
"That which we persist in doing becomes easier, not that the task itself has become easier, but that our ability to perform it has improved."
--Ralph Waldo Emerson
In Section
Seekers of Perl Wisdom