我应该在Perl中使用哪个“for”循环？

Question

使用其中一个for循环来计算整数的参数是什么？

for my $i (0..$n) { ... }

for (my $i = 0; $i <= $n; $i++) { ... }

Answer 1

在你的情况下，没有任何区别。

在其他用例中，在for-each循环中，您无法控制或访问迭代器。

使用您的示例语法：

for my $i (0..10)
{
   print "$i";
   $i++;
}

上面实际上创建了一个foreach循环 - 它与foreach my $i (0..10) 。 $i是从列表返回的值 ，而不是迭代器。 迭代器是内部的，你没有任何访问权限; 你无法控制循环的流量。

上面的输出将打印012345678910 。

这个：

for ( my $i = 0; $i++ ; $i <= 10)
{
    print $i;
    $i++;
}

这是一个实际的for循环。 您正在控制并输出迭代器。 它将输出： 0246810

此外：

当您执行for (1..$n)您将调用范围运算符，而不是在循环顶部进行简单比较。 但是，性能差异是无法估量的。

Answer 2

Perl中两种for循环风格的区别在于清晰度和效率。

当你查看for my $i (0 .. $n) {...}你可以立即看到正在使用的范围，而无需在心理上解析更大的表达式。

for (my $i = 0; $i <= $n; $i++) {...}还有更多要关注的内容，以及更多可能出现错误的地方。

此外，一个范围内的foreach比等效的C风格循环更快，如下面的基准所示：

use Benchmark 'cmpthese';

for my $mag (map 10**$_, 1 .. 6) {
    print "\n$mag:\n";
    cmpthese -2 => {
        loop => sub {my $x = 0; for (my $i = 0; $i <= $mag; $i++) {$x += $i}},
        each => sub {my $x = 0; for my $i (0 .. $mag) {$x += $i}},
    };
}

打印：

10:
         Rate loop each
loop 613877/s   --  -2%
each 625568/s   2%   --

100:
         Rate loop each
loop  79481/s   -- -24%
each 104758/s  32%   --

1000:
        Rate loop each
loop  8140/s   -- -27%
each 11220/s  38%   --

10000:
       Rate loop each
loop  832/s   -- -26%
each 1124/s  35%   --

100000:
       Rate loop each
loop 81.6/s   -- -26%
each  110/s  34%   --

1000000:
       Rate loop each
loop 6.90/s   -- -26%
each 9.27/s  34%   --

Answer 3

使用三部分for循环，你可以$i += 3 ，如果你想从循环内部这样做，但是使用foreach循环，你不是。 这就是区别。

Answer 4

您最初在C风格循环中出现的逐个错误表明C风格的循环更容易出错，并且只有在您确实需要访问循环计数器时才应该使用。 foreach循环使得逐个错误变得更加困难。

Answer 5

我相信你发布的两个循环示例表现相同。 在这两种情况下， $i都是词法范围的（因为你使用my关键字）。 我认为0..$n语法更清晰，但（惊喜！）不是每个人都同意这一点。