I'm not ignoring the problem, I'm putting a bandaid on it until I figure out what is
really wrong. I'll play with this code.
TimH
On Fri, 13 Dec 2002 16:04:25 -0800
Bob Miller <[EMAIL PROTECTED]> wrote:
> Tim Howe wrote:
>
> > I have a heavily used web server that has been deciding to simply
> > stop serving pages for up to 20 minutes at a time... I have already
> > tried all manner of Apache and OS tweeks to stop this but nothing
> > seems to work. Restarting the server puts everything back on track.
> > What I would like to do, until I find a real fix, is have a Perl
> > program try to connect to that machine on port 80, and if it fails
> > to get a page within, say, 5 seconds, to restart the server. I have
> > found a bunch of modules that will ping and or connect to web
> > servers, but none of them seem to have a good way to time the
> > response. Any suggestions?
>
> First suggestion: fix the problem, not the symptom.
>
> Second suggestion: since you're ignoring the first suggestion (-: ,
> take a look at this perl script.
>
> #!/usr/bin/perl
>
> use strict;
> use LWP::UserAgent;
>
> sub check() {
> my $ua = LWP::UserAgent->new(timeout => 5);
> my $response = $ua->get('http://www.example.com/');
> unless ($response->is_success) {
> system("apachectl restart");
> }
> }
>
> while (1) {
> check;
> sleep 60;
> }
>
>
> --
> Bob Miller K<bob>
> kbobsoft software consulting
> http://kbobsoft.com [EMAIL PROTECTED]
> _______________________________________________
> Eug-LUG mailing list
> [EMAIL PROTECTED]
> http://mailman.efn.org/cgi-bin/listinfo/eug-lug
_______________________________________________
Eug-LUG mailing list
[EMAIL PROTECTED]
http://mailman.efn.org/cgi-bin/listinfo/eug-lug
