in reply to Re: Win32::Event questionin thread Win32::Event question
Try Term::ReadKey's ReadKey -1.
There's also Win32::Console's PeekInput and Input.
I haven't tried either. The second comes with ActivePerl.