stty cbreak </dev/tty >&1 : system « System Functions « Perl






stty cbreak </dev/tty >&1

    

system "stty cbreak </dev/tty >&1"; 

print ">";

while (($char = getc) ne 'q') {
    print "\n";
    print "You typed $char\n>";
}

   
    
    
    
  








Related examples in the same category

1.Using system on Windows
2.Using system on Windows with the Windows START command
3.Using system to call os/shell function
4.system "stty cbreak &1";
5.Using system to call a command passed in by an array
6.Calling system.
7.Read system command and execute
8.Uses the system function to clear the screen
9.The system command executes a command and waits until that command completes.