如何创建Perl脚本以获取一些"命名"命令行参数?

And*_*niz 8 perl command-line

如何创建Perl脚本以获取一些"命名"命令行参数?

例如:

perl my_perl.pl -ARG_1 1234 -ARG_2 "Testing"
Run Code Online (Sandbox Code Playgroud)

其中ARG_1和ARG_2是参数名称,1234和"测试"它们的值.

Rob*_*Mah 15

使用Getopt :: Long可以获得类似的效果.主要区别在于它默认使用gnu-style --arguments.它非常灵活和强大.


Sin*_*nür 8

Getopt :: Long.如果你不喜欢它,还有很多其他的.

在最简单的情况下,您可以这样做:

my %args = @ARGV;
print $args{-ARG_1}, "\n";
Run Code Online (Sandbox Code Playgroud)