Perl 使用参数创建路径

Perl use argument to create path

调用 Perl 脚本时我得到了一个参数,我想使用该参数为我的日志创建路径。

我这样调用 Perl 脚本:

./hello.pl GERMANY

我想使用第一个参数来创建日志路径,如下所示:

my $country= shift @ARGV;
my $name_of_log='/usr/log/{$country}/hello.log';

我将如何在 Perl 中执行此操作?

应该这样做:

my $name_of_log = "/usr/log/" . $country . "/hello.log';

当然,您可能想要 运行 对其进行一些健全性检查,例如确保它无法通过使用 ../usr/log 区域 "escape" ,例如。