Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

(code) Re: cross-platform timeout on user input (Grrr!! "not supported on this platform")

by ybiC (Prior)
on Apr 27, 2001 at 15:25 UTC ( #76037=note: print w/replies, xml ) Need Help??


in reply to cross-platform timeout on user input

Thanks for the ideas, THRAK and repson.   8^)
But they don't quite address my quest for knowledge of Win32 perl for timing-out on user input.

Anyone?   Bueller?   {grin}

Update:
Thanks to good monk tye for a polite RTFM   8^)   perldoc Term::ReadKey indicates that it just *might* support timeout internally.   I'm still experimenting with the syntax - will post results.

Update:
No go.   "Non-blocking ReadLine is not supported on this architecture" with ActivePerl 5.6 on Win2k, but runs fine on Debian 2.2r3

$!/usr/bin/perl -w use strict; use Term::ReadKey; use Term::ReadLine; ReadMode('noecho'); print 'enter password:'; my $pass = ReadLine(5); ReadMode('restore'); unless (defined($pass)) { print "\n\nSorry, you waited too long.\n\n"; exit; }

    muttering to himself...
    Don
    striving toward Perl Adept
    (it's pronounced "why-bick")

  • Comment on (code) Re: cross-platform timeout on user input (Grrr!! "not supported on this platform")
  • Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://76037]
help
Chatterbox?
[Discipulus]: who make the invitation? the program?!?
[choroba]: it's historical
[erix]: pull requests
[choroba]: originally, you sent a pull request to someone by email, i.e. you asked them to pull from your repo
[Discipulus]: if is the author of a patch, is more like a 'request to push' into rather than a pull request..
[choroba]: as it's considered unpolite to push to someone else's repo
[choroba]: and in fact, you don't push into the target repo, you push into your branch of your fork
[choroba]: the maintainer of the upstream repo than "merges" the pull request, i.e. they pull from your fork into the upstream
[Discipulus]: ' i.e. you asked them to pull from your repo' =~ I (subj) want to push
[Discipulus]: chorobayour words are reasonable

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2017-05-27 20:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?