perl - 使用 Perl PAR:Packer exe -s 命令行输入

Question

我经常将 perl-s选项用于我的脚本的命令行输入。现在，我想使用PAR::packer. 有没有办法可以将这种风格的命令行输入与 exe 文件一起使用？

例如，我会运行一个 perl 脚本：

perl my_script.pl -name="Robin" -date=20130201

在此脚本中，变量$name和$date将使用给定的值进行初始化。我可以使用从 my_script 创建的 exe 文件（使用PAR::packer）来模拟这种行为吗？

Answer 1

您可以在脚本的开头添加类似的内容：

BEGIN{ 
    my %args = map {s/^-{0,2}//; split /[=:]/} @ARGV;
    no strict 'refs';
    $$_ = $args{$_} for keys %args;
    @ARGV = ();
}

或者把它放在你在脚本开始时“使用”的包中。

编辑：更改本地=>我的，简化地图并且不添加严格的 'refs' 作为 sugested。