We don't bite newbies here... much | |
PerlMonks |
Re^3: Timeouts: Any alternative to alarm in Win32?by BrowserUk (Patriarch) |
on Dec 04, 2008 at 00:43 UTC ( [id://727840]=note: print w/replies, xml ) | Need Help?? |
Do you see any problem with removing the sleep 1; line from the loop? Well, without it, the loop will burn 100% cpu. If you need to go more quickly when the response is available more quickly, use Time::HiRes::usleep and say 25 milliseconds. (Or select<c>undef, undef, undef, 0.025;</c. would do.) It'll avoid maxing the cpu but cut the minimum delay to 1/40th. Vary the number to see what you find acceptable. As there is IO involved, I doubt you'll go much more quickly with less than 25 millseconds. I will test it under Linux when I get back to my office. Be aware that I have no idea whether that ioctl number (0x8004667e), which is the key to the approach, will work on any system other than Win32. It might, but don't be surprised if it doesn't. Alternatively, if it does, please post to let me (us) know. It's always good to know these things. Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
In Section
Seekers of Perl Wisdom
|
|