xref: /openbsd/gnu/usr.bin/perl/t/run/switchn.t (revision 7b36286a) 
1#!./perl -n
2
3BEGIN {
4    print "1..2\n";
5    *ARGV = *DATA;
6}
7print;
8
9__DATA__
10ok 1
11ok 2
12