From 3ae10b23c87487596c29a01ee83d3aadcf3e9582 Mon Sep 17 00:00:00 2001 From: Shaun Smiley Date: Thu, 11 May 2017 10:41:43 -0700 Subject: [PATCH] fix output_value not referencing correct key --- check_json.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/check_json.pl b/check_json.pl index fb253c9..db9f055 100755 --- a/check_json.pl +++ b/check_json.pl @@ -245,10 +245,10 @@ foreach my $key ($np->opts->outputvars eq '*' ? map { "{$_}"} sort keys %$json_response : split(',', $np->opts->outputvars)) { # use last element of key as label my $label = (split('->', $key))[-1]; - # make label ascii compatible + # make label ascii compatible i.e. remove the { and } $label =~ s/[^a-zA-Z0-9_-]//g; my $output_value; - $output_value = $json_response->{$key}; + $output_value = $json_response->{$label}; push(@statusmsg, "$label: $output_value"); } }