This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate mainline
[perl5.git] / t / run / switchF.t
CommitLineData
d11311f7
RGS
1#!./perl -anFx+
2
3BEGIN {
4 print "1..2\n";
5 *ARGV = *DATA;
6}
7print "@F";
8
9__DATA__
10okx1
11okxxx2