Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re^5: Need Help With Alarm And Eval

by afoken (Prior)
on Dec 07, 2012 at 15:34 UTC ( #1007758=note: print w/ replies, xml ) Need Help??

in reply to Re^4: Need Help With Alarm And Eval
in thread Need Help With Alarm And Eval

I want subs to switch on and off my alarm so that i can call them when needed

Why? The code you showed first is more or less the usual code for having a timeout in some long running code. (You do know the example in perlipc, right?) If you don't need a timeout, just don't mess with alarm and $SIG{'ALRM'} at all.

In code:

withTimeout(30,\&doSomething,sub { die 'Oooops, doSomething was too sl +ow' }); # <-- timeout after 30 seconds doSomething(); # <-- no timeout here

If you still think that you need to "switch on and off", please explain your actual problem.


Today I will gladly share my knowledge and experience, for there are no sweeter words than "I told you so". ;-)

Comment on Re^5: Need Help With Alarm And Eval
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1007758]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (8)
As of 2015-10-06 20:15 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (160 votes), past polls