Gossamer Forum
(Advanced Search)
for
Home : General : Perl Programming :

How can I kill CGI process before it times my site out?

Oct 31, 2002, 9:44 AM
syeago
New User (3 posts)
Oct 31, 2002, 9:44 AM
Post #1 of 4
Views: 3472
Shortcut
Quote Reply
How can I kill CGI process before it times my site out?
The situation is:



I'm getting information off of another server, recombining it, blah blah blah. My issue is that sometimes the site does not respond (his server bites). When this happens--MY script times out and returns nothing to the user.

I'd like to fail the GET after so many seconds have passed.



Thank you.
Oct 31, 2002, 11:06 AM
Alex
Administrator (9387 posts)
Oct 31, 2002, 11:06 AM
Post #2 of 4
Views: 3356
Shortcut
Quote Reply
Re: [syeago] How can I kill CGI process before it times my site out? In reply to
If you are on unix, see

perldoc -f alarm

Cheers,

Alex
--
Gossamer Threads Inc.
Oct 31, 2002, 11:35 AM
syeago
New User (3 posts)
Oct 31, 2002, 11:35 AM
Post #3 of 4
Views: 3346
Shortcut
Post deleted by syeago In reply to
Oct 31, 2002, 11:38 AM
syeago
New User (3 posts)
Oct 31, 2002, 11:38 AM
Post #4 of 4
Views: 3352
Shortcut
Quote Reply
Re: [Alex] How can I kill CGI process before it times my site out? In reply to
  eval {
local $SIG{ALRM} = sub { die "alarm\n" }; # NB: \n required
alarm $timeout;
$nread = sysread SOCKET, $buffer, $size;
alarm 0;
};
if ($@) {
die unless $@ eq "alarm\n"; # propagate unexpected errors
# timed out
}
else {
# didn't
}



Found this--it is greek to me. How would one integrate it to fail a call?