From b44022cdd1810159d54734e3bae41cd392a2d7a5 Mon Sep 17 00:00:00 2001
From: Heuzef <contact@heuzef.com>
Date: Fri, 20 Sep 2019 15:52:09 +0200
Subject: [PATCH] Remove perl-IPC-System-Simple

---
 Check.pm   | 3 +--
 readme.txt | 2 +-
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/Check.pm b/Check.pm
index f6b694f..49d7984 100644
--- a/Check.pm
+++ b/Check.pm
@@ -22,7 +22,6 @@ package BackupPC::CGI::Check;
 
 use strict;
 use BackupPC::CGI::Lib qw(:all);
-use IPC::System::Simple qw(system capture);
 
 sub action
 {
@@ -131,7 +130,7 @@ sub action
 	    $shortErr = " ($shortErr)";
 	}
 
-  my $sizeConsistency = system($^X, "/bin/perl check_size_consistency.pl --host=localhost");
+  my $sizeConsistency = `/bin/perl check_size_consistency.pl --host=localhost`;
 
         $str = <<EOF;
 <tr$reasonHilite><td class="border">${HostLink($host)}</td>
diff --git a/readme.txt b/readme.txt
index 5bf72d3..8adfd87 100644
--- a/readme.txt
+++ b/readme.txt
@@ -1,6 +1,6 @@
 Need to install some perl module :
 
-yum -y install perl-JSON perl-Statistics-Descriptive perl-IPC-System-Simple
+yum -y install perl-JSON perl-Statistics-Descriptive
 
 Update script :
 cd BackupPC-Check