I would cleanup a bit:
#!/usr/bin/perl -l
use strict;
use warnings;
use Log::Dispatch::FileRotate;
use Log::Log4perl qw(get_logger);
my $conf = q(
log4perl.category.fileLogger = INFO, Logfile
log4perl.appender.Logfile = Log::Dispatch::FileRotate
log4perl.appender.Logfile.filename = code_review.log
log4perl.appender.Logfile.mode = append
log4perl.appender.Logfile.max = 15
log4perl.appender.Logfile.size = 15000
log4perl.appender.Logfile.layout = \
Log::Log4perl::Layout::PatternLayout
log4perl.appender.Logfile.layout.ConversionPattern = \
[%d (%P) %rms %p] %m%n
);
Log::Log4perl->init( \$conf );