#!/usr/bin/perl
use Log::Log4perl;
# Initialize Logger
my $log_conf = "/etc/2.log.conf";
Log::Log4perl::init($log_conf);
my $logger = Log::Log4perl->get_logger();
$logger->info("===== before system call");
system('ls -l qwerty');
if( $? > 0 ) {
    $logger->error("there was an error: $?");
}
$logger->info("===== after system call");