tyler.durden/centreon-plugins
1
0
Fork 0
mirror of https://github.com/centreon/centreon-plugins.git synced 2025-07-27 07:34:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix bluemind mode problem with centos 5 (operator can be used with Perl >= 5.10)

Browse Source
This commit is contained in:
Quentin Garnier 2015-02-16 11:01:24 +01:00
parent 67e6ce67ce
commit 615f5c46f0
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
apps/bluemind/mode/incoming.pm
View File

@ -41,9 +41,7 @@ use strict;
use warnings; use warnings;
use centreon::plugins::httplib; use centreon::plugins::httplib;
use centreon::plugins::statefile; use centreon::plugins::statefile;
use JSON; use JSON;
use Data::Dumper;
sub new { sub new {
my ($class, %options) = @_; my ($class, %options) = @_;
@ -146,8 +144,8 @@ sub run {
} }
} }
my $success_incoming_mails = $hwebcontent->{qw(lmtpd.deliveries)}->[0]->{success_sum} // '0'; my $success_incoming_mails = defined($hwebcontent->{qw(lmtpd.deliveries)}->[0]->{success_sum}) ? $hwebcontent->{qw(lmtpd.deliveries)}->[0]->{success_sum} : '0';
my $failure_incoming_mails = $hwebcontent->{qw(lmtpd.deliveries)}->[0]->{failure_sum} // '0'; my $failure_incoming_mails = defined($hwebcontent->{qw(lmtpd.deliveries)}->[0]->{failure_sum}) ? $hwebcontent->{qw(lmtpd.deliveries)}->[0]->{failure_sum} : '0';
# If not present: failure and success incoming mails are 0 # If not present: failure and success incoming mails are 0
if (!defined($success_incoming_mails)) { if (!defined($success_incoming_mails)) {