Debian lenny version packages
[pkg-perl] / deb-src / libtest-harness-perl / libtest-harness-perl-3.12 / t / sample-tests / echo
1 print '1..', scalar(@ARGV), "\n";
2 print "ok $_ ", $ARGV[ $_ - 1 ], "\n" for 1 .. @ARGV;