如何让Log4Perl为每个脚本使用单独的文件？

cpan install Log::Log4perl

use Log::Log4perl qw(:easy);

# 设置日志文件名
my $log_file = "log/script_$$.log";

# 配置Log4Perl
Log::Log4perl->init(
    \q{
        log4perl.rootLogger=DEBUG, SCREEN, FILE
        log4perl.appender.SCREEN=Log::Log4perl::Appender::Screen
        log4perl.appender.SCREEN.layout=Log::Log4perl::Layout::PatternLayout
        log4perl.appender.SCREEN.layout.ConversionPattern=%d{yyyy-MM-dd HH:mm:ss} %p %m%n
        log4perl.appender.FILE=Log::Log4perl::Appender::File
        log4perl.appender.FILE.filename=$log_file
        log4perl.appender.FILE.mode=append
        log4perl.appender.FILE.layout=Log::Log4perl::Layout::PatternLayout
        log4perl.appender.FILE.layout.ConversionPattern=%d{yyyy-MM-dd HH:mm:ss} %p %m%n
    }
);

# 获取日志记录器
my $logger = Log::Log4perl->get_logger();

# 记录日志
$logger->info("这是一个INFO级别的日志");
$logger->debug("这是一个DEBUG级别的日志");