in reply to When is a while not a while?

I think you need to explore the wonders of Term::ReadKey, which has lots of neat tricks but one of them is the function ReadKey.

And I quote from perldoc Term::ReadKey ( slightly reformatted to make it read easier )

ReadKey MODE [, Filehandle] Takes an integer argument, which can currently be one of the following values: 0 Perform a normal read using getc -1 Perform a non-blocked read >0 Perform a timed read (If the filehandle is not supplied, it will default to STDIN.) If there is nothing waiting in the buffer during a non-blocked read, then undef will be returned. Note that if the OS does not provide any known mechanism for non-blocking reads, then a `ReadKey -1' can die with a fatal error. This will hopefully not be common.
You can play meaner games with select() if you cannot get this module installed.


Replies are listed 'Best First'.
RE: RE: When is a while not a while?
by Miker (Scribe) on Aug 24, 2000 at 22:43 UTC
    Thanks, I'm glad to have as many options as possible. I'm going to know my way around CPAN pretty well after today :) I like the sounds of ReadKey so thats going to be my next try...
RE: RE: When is a while not a while?
by Miker (Scribe) on Aug 25, 2000 at 00:13 UTC
    Thanks, that did the trick perfectly. No while loop was needed as the key seek was called in one of the main loops of the program. Thank you very very much, mikfire:)