The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
BEGIN { $| = 1; print "1..1\n"; }

END {print "not ok 1\n" unless $loaded;}

use Awk;

$loaded = 1;

print "ok 1\n";

# No tests here yet but there is a full regression test at:
# http://homepage.eircom.net/~jmcnamara/perl/iawk_regtest_0.03.tar.gz