How do I read arrow keys (i.e. up, down, left, right) and function keys in
ActivePerl running on Windows XP?
I tried using Term::ReadKey (see below), but it only prints "0" when I enter
an arrow key or function key.
use Term::ReadKey;
ReadMode 4; # Turn off controls keys
while (not defined ($key = ReadKey(-1))) {
# No key yet
}
print "$key " . ord($key) . "\n";
ReadMode 0; # Reset tty mode before exiting
--
View this message in context:
http://www.nabble.com/Reading-arrow-keys-and-function-keys-tf2084209.html#a5742761
Sent from the Perl - ActivePerl forum at Nabble.com.
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
