Fwd: 'system uptime' service - contribution
"Kirk Bauer" <[email protected]>
| Newsgroups | gmane.comp.log.logwatch.devel |
|---|---|
| Message-ID | <[email protected]> |
Thanks Jason, I am forwarding this to the list for comment as I'm not sure how popular these types of scripts are in Logwatch. Personally I think it is OK to have the variety but I notice that many people don't like any extra clutter in the emails. ---------- Forwarded message ---------- From: Jason SJOBECK <[email protected]> Date: Mar 2, 2007 6:32 PM Subject: 'system uptime' service - contribution To: [email protected] Kirk, I would like to contribute something very small but potentially worthwhile to the project please. ------------------------------------------ ###################################################################### #### # $Id: uptime,v 1.00 2007/02/06 23:59:59 [email protected] Exp $ ###################################################################### #### my $env = ( $ENV{'REAL_LANG'} ? "LANG=".$ENV{'REAL_LANG'}." " : "" ). ( $ENV{'REAL_LC_ALL'} ? "LC_ALL=".$ENV{'REAL_LC_ALL'}." " : "" ); if (($ENV{'PRINTING'} eq "y" ) && (-f "/usr/bin/uptime")) { #print "\n\n------------------ System Uptime --------------------\n\n"; system("$env /usr/bin/uptime"); print "\n"; } elsif (($ENV{'PRINTING'} eq "y" ) && (-f "/usr/bin/uptime")) { #print "\n\n------------------ System Uptime --------------------\n\n"; system("$env /usr/bin/uptime"); print "\n"; } # vi: shiftwidth=3 tabstop=3 syntax=perl et ------------------------------------------ I think it might live here: <http://www2.cvs.logwatch.org:81/index.cgi/logwatch/scripts/services/# dirlist> Thoughts? Cheers. Jason Sjöbeck sjobeck.com -- Kirk Bauer <[email protected]> http://linux.kaybee.org | www.autorpm.org | www.logwatch.org _______________________________________________ Logwatch-Devel mailing list [email protected] http://www2.list.logwatch.org:81/mailman/listinfo/logwatch-devel
smime.p7s
(application/x-pkcs7-signature, 3.3 KB) - not displayed