source: trunk/essentials/dev-lang/perl/t/run/switchp.t

Last change on this file was 3181, checked in by bird, 18 years ago

perl 5.8.8
File size: 82 bytes
Line 
1#!./perl -p
2
3BEGIN {
4 print "1..2\n";
5 *ARGV = *DATA;
6}
7
8__DATA__
9ok 1
10ok 2
Note: See TracBrowser for help on using the repository browser.