foreach (<THRESHOLDS>) {
 chomp($_);
 if (my ($name, $value) = $_ =~/^(\w+);(\d+);$/ && $_ !~/^\#/) {
  eval "use constant $name => $value;";
  log_msg("Setting: use constant $name => $value;");
  if ($Threslabels[$Threscount] ne $name) {
   log_msg("There is something wrong with the thresholds labels, check threshold
+s file!");
   exit(2);
  }
 $Threscount++;
 }
}