in reply to Sleep until keypress
See Term::ReadKey, getc, and "How can I read a single character from a file? From the keyboard?" in perlfaq5.
The cake is a lie. The cake is a lie. The cake is a lie.