Occasional Contributor
Perl
I am trying to write some perl code to convert this into a strictly Perl script.

Instead of using the system calls, is it possible to do this strictly in Perl without relying on sed and awk?

Example:

system "awk '/dat/ { print $9 }' /export/home/soglesby/gents_processed | sed 's/\.dat//g' | sed 's/\return_*//g'"

How would I be able to do this without sed and
awk?

Thanks


I am not having much luck and cannot find
any examples in the book to do the equivalent