Perl Inline module to include awk code in a Perl program. - View it on GitHub