Perl命令行输入？

Question

如何设置 Perl 脚本，以便命令行上的输入表示脚本查看的内容/位置（哪个目录）？

示例：

cdm line:>perl text.pl C:/pathtodirectory/

在脚本中，我得到一个可验证的 $path 设置为：C:/pathtodirectory

谢谢

Answer 1

您需要使用@ARGV数组。

因此，在您的 text.pl:

my $path = shift(@ARGV);

或

my $path = shift; # @ARGV is the default in the main part of your script

@ARGV 中，命令行上的每个项目都是从索引 0 开始的...所以如果您有更多选项，例如

text.pl some/path some_other_option

some_other_option< /code> 将作为 $ARGV[1] 提供。

有关更高级的路径处理，请查看 Getopt::Std 或 Getopt::Long code> 模块（默认情况下它们应该包含在 Perl 中。

Answer 2

命令行参数放置在数组@ARGV 中。你可以像这样得到它们：

my $path = shift @ARGV;
# or just (shift defaults to using @ARGV outside of any function):
my $path = shift;

Answer 3

@ARGV 预定义变量包含脚本的命令行参数。

Answer 4

在这种情况下，您可以使用 Perl 的 Getopt::Long 模块记录在此处。

或者你可以简单地解析 ARGV：

$ perl -MData::Dumper -e 'print Dumper \@ARGV;' foo bar