Perl.it - Documenti

[6] Come posso controllare se è pronto l'input dalla tastiera?

Il modo più facile in assoluto per farlo è leggere un tasto in modalità non bloccante, con il modulo Term::ReadKey da CPAN, passando come argomento -1 ad indicare il non blocco:

      use Term::ReadKey;

      ReadMode('cbreak');

      if (defined ($carattere = ReadKey(-1)) ) {
          # l'input sta aspettando ed era $carattere
      } else {
          # nessun input sta aspettando
      }

      ReadMode('normal');       # ripristina le normali impostazioni tty

vedi in inglese

AUTORE E COPYRIGHT

Questa documentazione è libera; puoi ridistribuirla e/o modificarla secondo gli stessi termini applicati al Perl.

Indipendentemente dalle modalitè di distribuzione, tutti gli esempi di codice in questo file sono rilasciati al pubblico dominio. Potete, e siete incoraggiati a farlo, utilizzare il presente codice o qualunque forma derivata da esso nei vostri programmi per divertimento o per profitto. Un semplice commento nel codice che dia riconoscimento alle FAQ sarebbe cortese ma non è obbligatorio.