Lines Matching refs:IN
36 sysopen( IN, 'CONIN$', O_RDWR ) or die "Unable to open console input:$!";
42 if ( open( IN, "</dev/tty" ) )
44 *OUT = *IN;
59 *IN = *IN; # Make single-use warning go away
62 # Bad filehandle: IN at ../lib/Term/ReadKey.pm line 377 with \IN and harness
63 my $size1 = join( ",", GetTerminalSize( -t \IN ? \IN : "IN" ) );
64 my $size2 = join( ",", GetTerminalSize("IN") );
65 my $size3 = join( ",", GetTerminalSize(*IN) );
66 my $size4 = join( ",", GetTerminalSize( \*IN ) );
222 %chars = GetControlChars(IN);
239 SetControlChars( %origchars, IN );
248 END { ReadMode 0, IN; } # Just if something goes weird
258 ReadMode 1, IN;
262 $t = ReadLine 0, IN;
268 ReadMode 2, IN;
276 $t = ReadLine 0, IN;
282 ReadMode 3, IN;
298 ReadMode 4, IN;
302 $in = \*IN; # or *IN or "IN"
308 #print "IN = $in\n";
315 ReadMode 0, IN;
319 ReadMode 4, IN;
323 $in = \*IN; # or *IN or "IN"
329 #print "IN = $in\n";
339 ReadMode 5, IN;
364 ReadMode 0, IN;