perl - 从第 n 项迭代到数组末尾的 Perlish 方法是什么？

Question

问题是我有 n 个命令行参数。总是至少有 2 个，但最大数量是无限的。第一个参数指定操作模式，第二个参数是要处理的文件。第 3 到第 n 是要对文件执行的操作(可能没有，因为用户可能只想清理文件，如果您只传递 2 个参数就可以完成)。

我正在查看 Perl 中可用于处理数组的方法，但我不确定从第 3 项迭代到数组末尾的“Perlish”方式是什么。

我见过的一些选项:

从数组的末尾弹出，直到找到一个不以“-”开头的元素(因为文件路径不以“-”开头，尽管我认为它可以，这可能会导致问题)。

移动数组两次以删除前两个元素。无论剩下什么我都可以迭代，如果它的大小至少为 1。

我喜欢第二种选择，但我不知道它是否是 Perlish。既然我正在努力学习 Perl，我不妨学习在 Perl 中做事的正确方法。

Answer 1

除了像 Sinan 写的那样使用 Getopt 模块之外，我可能会选择:

my ( $operation, $file, @things ) = @ARGV;

然后你可以:

for my $thing_to_do ( @things ) {
...
}