Not a perl solution but it sounds like something that nagios will do quite well. www.nagios.org. It will monitor a bunch of different statistics about machines on your network, throw alerts if something breaks and keep a history of what was broken etc. Decent software.