Select Code to Download

Select or download this

############Root############
log4perl.rootLogger=ERROR, A1
...

log4perl.appender.LOGFILE.layout=PatternLayout
log4perl.appender.LOGFILE.layout.ConversionPattern=[%d{ABSOLUTE}] %p %
+c - %m%n

Select or download this

use warnings;
use strict;
...
$log->error("Log only Error message");

$log->logwarn("Log only We have hit a warning\n");

Select or download this

[system]$ cat log.log
[14:06:36,001] INFO fileLogger - Log only Info message
[14:06:36,001] ERROR fileLogger - Log only Error message
[14:06:36,002] WARN fileLogger - Log only We have hit a warning

Select or download this

[system]$ cat error.log
[14:06:36,001] INFO fileLogger - Log only Info message
[14:06:36,001] ERROR fileLogger - Log only Error message
[14:06:36,002] WARN fileLogger - Log only We have hit a warning