Hi,
I've been experiencing some trouble with the WWW service shutting down
without notice requiring a reboot and, while I figure out what's causing
this problem, I would like to code something simple that would detect when
the server stops delivering pages and immediately initiate a restart.
The basic flow would be:
- script makes an HTTP request from the server (waiting say 10 seconds for
a response)
- if there is a response, then wait another 15 seconds and repeat the
previous routine
- else no response, then...
- send an email notification to the administrator
- and, reboot the server
I mostly need help in knowing how to make the HTTP request and how to
reboot the system from Perl. I already know how to send the email notice,
so there's no need to invest a lot of effort in explaining that one.
Thank you much.
Tim
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
