index a702a89ef2c3c924c0977423e0fb6ff567209415..8fdc4294d1e274751eedf52c29ac4e3214198c9b 100644 (file)
}
if (defined($critical_vals)) {
- die "Cannot Parse Critical Thresholds\n"
- unless (split(/:/,$critical_vals)>=2);
- ($inlet_thresh,$outlet_thresh) = @_
+ if ($critical_vals =~ m/^([0-9]+)[,:]([0-9]+)$/) {
+ ($inlet_thresh,$outlet_thresh) = ($1, $2);
+ } else {
+ die "Cannot Parse Critical Thresholds\n";
+ }
}
-die unless(defined($inlet_thresh) && defined($outlet_thresh));
if (defined($warning_vals)) {
- die "Cannot Parse Critical Thresholds\n"
- unless (split(/:/,$warning_vals)>=2);
- ($inlet_warn,$outlet_warn) = @_;
+ if ($warning_vals =~ m/^([0-9]+)[:,]([0-9]+)$/) {
+ ($inlet_warn,$outlet_warn) = ($1, $2);
+ } else {
+ die "Cannot Parse Warning Thresholds\n";
+ }
}else{
$inlet_warn=$inlet_thresh;
$outlet_warn=$outlet_thresh;