[Nagios-checkins] CVS: nagios p1.pl,1.2,1.3
Nagios network monitoring software is enterprise server monitoring
Brought to you by:
egalstad,
sawolf-nagios
From: Ethan G. <ega...@us...> - 2004-01-26 02:05:14
|
Update of /cvsroot/nagios/nagios In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8307 Modified Files: p1.pl Log Message: Stanley's embedded Perl mods Index: p1.pl =================================================================== RCS file: /cvsroot/nagios/nagios/p1.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -r1.2 -r1.3 *** p1.pl 25 Oct 2002 04:57:09 -0000 1.2 --- p1.pl 26 Jan 2004 02:04:21 -0000 1.3 *************** *** 1,43 **** package Embed::Persistent; # ! # Hacked version of the sample code from the perlembedded doco. # ! # Only major changes are to separate the compiling and cacheing from ! # the execution so that the cache can be kept in "non-volatile" parent ! # process while the execution is done from "volatile" child processes ! # and that STDOUT is redirected to a file by means of a tied filehandle ! # so that it can be returned to Nagios in the same way as for ! # commands executed via the normal popen method. [...1006 lines suppressed...] ! service checks, the Nagios process uses ~ 80 MB after 20-30 days running. It is usually stopped and started at this point.) ! ! Note that a HUP signal is not sufficient to deallocate the Perl memory; the Nagios process must be stopped and started. ! ! ! =head1 AUTHOR ! ! Originally by Stephen Davies. ! ! Now maintained by Stanley Hopcroft <hop...@cp...> who retains responsibility for the 'bad bits'. ! ! =head1 COPYRIGHT ! ! Copyright (c) 2004 Stanley Hopcroft. All rights reserved. ! This program is free software; you can redistribute it and/or modify ! it under the same terms as Perl itself. ! ! =cut ! |