[icinga-checkins] icinga.org: icinga-core/fholzer/core: Use Env module instead of `env`

git at icinga.org git at icinga.org
Fri Apr 20 20:42:05 CEST 2012


Module: icinga-core
Branch: fholzer/core
Commit: 8bfd422d8002e6462e252a2537c6b4123d1b817c
URL:    https://git.icinga.org/?p=icinga-core.git;a=commit;h=8bfd422d8002e6462e252a2537c6b4123d1b817c

Author: Alexander Wirt <formorer at grml.org>
Date:   Fri Apr 20 16:03:56 2012 +0200

Use Env module instead of `env`

---

 tools/icinga_verification.pl |    8 +++-----
 1 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/tools/icinga_verification.pl b/tools/icinga_verification.pl
index 2c6f7ae..fe03785 100644
--- a/tools/icinga_verification.pl
+++ b/tools/icinga_verification.pl
@@ -26,6 +26,7 @@ use strict;
 use warnings;
 use DBI;
 use Term::ANSIColor;
+use Env qw (LANG);
 
 ################################
 # Script Config
@@ -107,9 +108,6 @@ if (@files == 0) {
 # PHP Version
 my @phpversion = `php -v`;
 
-#environment Language
-my $envlang = `env | grep LANG`;
-
 #Current Time/Date
 my $date = `date`;
 
@@ -246,7 +244,7 @@ print " Current Date/Time on Server: $date";
 print "\n OS Information:\n";
 print " OS Name: @distriinfo";
 print " Kernel Version: $osversion";
-print " Environment-$envlang";
+print " Environment-$LANG";
 print "\n Webserver Information:\n";
 print " $apacheinfo[0] \n $apacheinfo[2] \n $apacheinfo[3] \n $apacheinfo[5] \n $apacheinfo[6] \n $apacheinfo[7] \n $apacheinfo[8] \n";
 print "\n PHP Information:\n $phpversion[0]";
@@ -274,4 +272,4 @@ my @services = ('httpd', 'mysqld', 'snmptt', 'icinga', 'ido2db');
  }
 print " ############################################################\n";
 
-exit;
\ No newline at end of file
+exit;





More information about the icinga-checkins mailing list