xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/run/switchn.t (revision 0:68f95e015346) 
1#!./perl -n
2
3BEGIN {
4    print "1..2\n";
5    *ARGV = *DATA;
6}
7print;
8
9__DATA__
10ok 1
11ok 2
12