Hi All!

I am trying to convert some Perl 5 code to Perl 6.

What do I use in place of
    use Term::ReadKey qw ( ReadKey ReadMode );

I am trying to convert the following:

<code>
use Term::ReadKey qw ( ReadKey ReadMode );

sub DumpKeyboard () {
   # Dump the contents of the keyboard buffer, if any
   my $Trash;

   ReadMode 4; # Turn off controls keys
   while  ( defined ( $Trash = ReadKey ( -1, \*STDIN ) ) ) {
      # print "\$Trash = $Trash\n";
   }
   ReadMode 1; # Reset tty mode before exiting
}

</code>


--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Computers are like air conditioners.
They malfunction when you open windows
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Reply via email to