Lines Matching refs:ARGV
41 @ARGV = ('Io_argv1.tmp', 'Io_argv1.tmp', $devnull, 'Io_argv1.tmp');
49 is($y, "1a line\n2a line\n3a line\n", '<> from @ARGV');
56 @ARGV = ('Io_argv1.tmp', 'Io_argv2.tmp');
78 @ARGV = ();
84 @ARGV = ();
85 ok( eof(), 'eof() true with empty @ARGV' );
87 @ARGV = ('Io_argv1.tmp');
90 @ARGV = ($devnull, $devnull);
93 close ARGV or die $!;
94 ok( eof(), 'eof() true after closing ARGV' );
115 fresh_perl_is( <<'**PROG**', "foobar", {}, "ARGV aliasing and eof()" );
120 *ARGV = *IN;