+ minor fix
This commit is contained in:
garnier-quentin 2014-02-02 21:05:34 +01:00
parent 88502e2caa
commit 66363fbadf
4 changed files with 4 additions and 4 deletions

View File

@ -88,7 +88,7 @@ sub check {
return if (scalar(keys %$result2) <= 0);
foreach my $key ($self->{snmp}->oid_lex_sort(keys %$result)) {
/\.(\d+)$/;
$key =~ /\.(\d+)$/;
my $cpu_Index = $1;
my $cpu_Status = $result->{$_};

View File

@ -70,7 +70,7 @@ sub check {
return if (scalar(keys %$result2) <= 0);
foreach my $key ($self->{snmp}->oid_lex_sort(keys %$result)) {
/(\d+)\.(\d+)$/;
$key =~ /(\d+)\.(\d+)$/;
my ($chassis_Index, $fan_Index) = ($1, $2);
my $instance = $chassis_Index . '.' . $fan_Index;

View File

@ -96,7 +96,7 @@ sub check {
return if (scalar(keys %$result2) <= 0);
foreach my $key ($self->{snmp}->oid_lex_sort(keys %$result)) {
/(\d+)\.(\d+)$/;
$key =~ /(\d+)\.(\d+)$/;
my ($chassis_Index, $psu_Index) = ($1, $2);
my $instance = $chassis_Index . '.' . $psu_Index;

View File

@ -83,7 +83,7 @@ sub check {
return if (scalar(keys %$result2) <= 0);
foreach my $key ($self->{snmp}->oid_lex_sort(keys %$result)) {
/(\d+)\.(\d+)$/;
$key =~ /(\d+)\.(\d+)$/;
my ($chassis_Index, $temperature_Index) = ($1, $2);
my $instance = $chassis_Index . '.' . $temperature_Index;