#!/usr/bin/perl
use Log::Log4perl;
Log::Log4perl::init('/root/log4perl.conf');
$log = Log::Log4perl->get_logger("");
        $log->debug("Debug message");
        $log->info("Info message");
        $log->warn("Warn message");
	$log->error("Error message");

##</code><code>##

log4perl.rootLogger=ERROR, LOGFILE

    log4perl.appender.LOGFILE=Log::Log4perl::Appender::File
    log4perl.appender.LOGFILE.filename=/root/AguLogs.log
    log4perl.appender.LOGFILE.mode=append
    
    log4perl.appender.LOGFILE.layout=PatternLayout
    #log4perl.appender.LOGFILE.layout.ConversionPattern= %d %F{1} %c %p %L> %m %n
    #log4perl.appender.LOGFILE.layout.ConversionPattern= %d %F{1} %c %p %m %n 
    log4perl.appender.LOGFILE.layout.ConversionPattern= %d %F{1} %c %p %m %n