[icinga-checkins] icinga.org: icinga-core/fholzer/core: You don' t need to call perl to know its version :)

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


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

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

You don't need to call perl to know its version :)

---

 tools/icinga_verification.pl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/tools/icinga_verification.pl b/tools/icinga_verification.pl
index 7bfb804..80ac02e 100644
--- a/tools/icinga_verification.pl
+++ b/tools/icinga_verification.pl
@@ -94,7 +94,7 @@ if (!$icinga_base){
 ################################
 
 # Perl Version
-my @perlversion = `perl -v`;
+my $perlversion = $^V;
 
 # Kernel version
 my $osversion = `uname -rp` ;
@@ -244,7 +244,7 @@ print "\n ############################################################";
 print "\n ######   Icinga Verification and Reporting Script     ######";
 print "\n ######  by Frankstar / Team Quality Assurance & VM    ######";
 print "\n ############################################################";
-print "\n $perlversion[1]";
+print "\n $perlversion";
 print " Current Date/Time on Server: $date";
 print "\n OS Information:\n";
 print " OS Name: @distriinfo";





More information about the icinga-checkins mailing list