ReadKey

[Jiri Polcar]

    Zdravim,

zajimalo by me, proc nefunguje example z Term::ReadKey z distribuce 
Red Hat 8.0.

---cut---
    use Term::ReadKey;

    ReadMode 4; # Turn off controls keys
    while (not defined ($key = ReadKey(-1))) {
        # No key yet
    }
    print "Get key $key\n";
    ReadMode 0; # Reset tty mode before exiting
---cut---
( Doplnil jsem chybejici pravou zavorku na 4. radku )

Fce ReadKey(-1) je vzdy UNDEFINED, i kdyz se neco zmackne. Nevim presne,
kde problem vznikl. Na RH 7.3 vse funguje, jak ma.

Podobne zaludnosti zpusobuje modul Term::ReadLine::Gnu a to jak na RH
8.0, tak i na Debian-Woodoo. Chovani je ale komplikovanejsi, i kdyz muze
mit stejny puvod.

--
JP