[p5sagit/p5-mst-13.2.git] / t / lib / sample-tests / echo

print '1..', scalar(@ARGV), "\n";
print "ok $_ ", $ARGV[ $_ - 1 ], "\n" for 1 .. @ARGV;
Commit	Line	Data
b965d173	1	print '1..', scalar(@ARGV), "\n";
b965d173	2	print "ok $_ ", $ARGV[ $_ - 1 ], "\n" for 1 .. @ARGV;