in reply to Awk usage in perl

You may want to look in the -a, -F and -n command line arguments.

In Section Seekers of Perl Wisdom