Log4Perl - how to set exit code if any WARN, ERROR, or FATAL messages?
- by pdxrlk
Hi - I've been using Log4Perl extensively in a number of scripts. I'd like to augment those scripts to set an error code if any WARN or ERROR messages have been logged. I couldn't find any obvious way to do this based on existing documentation.
I'd like to avoid a brute-force rewrite of my existing scripts to add a check on every WARN or ERROR log message; I'd prefer to handle it prior to script exit if possible like this pseudocode:
if $log->has_warnings_or_errors then
exit 1
else
exit 0
Is there any easy way to call Log4Perl to determine if the current logger has issues messages of certain levels?
Thanks.
