Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^2: Executing Systems Calls with Care

by K_M_McMahon (Hermit)
on Feb 15, 2005 at 08:40 UTC ( #431060=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
         local $SIG{ALRM} = sub { die "alarm\n" }; 
    
  2. or download this
    if ($@) 
        {
        die unless $@ eq "alarm\n";   # propagate unexpected errors
        # handle the timed out operation
        }
    
  3. or download this
    my $a='62696c6c77667269656e6440676d61696c2e636f6d';
    while ($a=~m/(^.{2})/s)
    {print unpack('A',pack('H*',"$1"));$a=~s/^.{2}//s;}
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://431060]
help
Chatterbox?
[LanX]: ... what's next? Donald as John Wayne in "Rio Pig Blood - Bad Hombres must Die" ?
[LanX]: nowadays no idea is too silly to be unlikely...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (7)
As of 2017-08-18 12:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Who is your favorite scientist and why?



























    Results (301 votes). Check out past polls.

    Notices?