add c-kr#26

Author: C0rn3j

check_json.pl

@@ -139,8 +139,14 @@
 if ($np->opts->verbose) { (print Dumper ($json_response))};
 
 my @attributes = split(',', $np->opts->attributes);
-my @warning = split(',', $np->opts->warning);
-my @critical = split(',', $np->opts->critical);
+my @warning;
+if ($np->opts->warning) {
+	@warning = split(',', $np->opts->warning);
+}
+my @critical;
+if ($np->opts->critical) {
+	@critical = split(',', $np->opts->critical);
+}
 my @divisor = $np->opts->divisor ? split(',',$np->opts->divisor) : () ;
 my %attributes = map { $attributes[$_] => { warning => $warning[$_] , critical => $critical[$_], divisor => ($divisor[$_] or 0) } } 0..$#attributes;