From ea4c5220b956bb59cf9dc6242f80afc315d6429d Mon Sep 17 00:00:00 2001 From: qgarnier Date: Tue, 20 Jun 2017 10:22:32 +0200 Subject: [PATCH] fix mode eventlog imm --- hardware/server/ibm/mgmt_cards/imm/snmp/mode/eventlog.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hardware/server/ibm/mgmt_cards/imm/snmp/mode/eventlog.pm b/hardware/server/ibm/mgmt_cards/imm/snmp/mode/eventlog.pm index a34668c95..6a5ea0b9e 100644 --- a/hardware/server/ibm/mgmt_cards/imm/snmp/mode/eventlog.pm +++ b/hardware/server/ibm/mgmt_cards/imm/snmp/mode/eventlog.pm @@ -165,7 +165,7 @@ sub manage_selection { my $result = $options{snmp}->map_instance(mapping => $mapping, results => $snmp_result, instance => $instance); my $date = $result->{eventLogDate} . ' ' . $result->{eventLogTime}; - $date =~ /^(\d+)\/(\d+)\/(\d+)\s+(\d+)\/(\d+)\/(\d+)/; + $date =~ /^(\d+)\/(\d+)\/(\d+)\s+(\d+)[:\/](\d+)[:\/](\d+)/; my $dt = DateTime->new(year => $3, month => $1, day => $2, hour => $4, minute => $5, second => $6, time_zone => $self->{option_results}->{timezone});