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