%ERRORS=('OK'=>0,'WARNING'=>1,'CRITICAL'=>2,'UNKNOWN'=>3,'DEPENDENT'=>4);
%ERROR_TEXT= map { $ERRORS{$_} => $_ } keys %ERRORS;