list - 循环遍历 Perl 中的列表

Question

我开始学习 Perl，这只是一个基本的小 for 循环，我得到了一个奇怪的输出，并希望对此有所了解。

@numbers = {1,4,5,6,7,8,9};
for(my$i = 0; $i<=$#numbers; $i++)
{
    print ("$numbers[$i}\n");
}

输出是 HASH(0x23a09c)。

这实际上意味着什么，为什么我会得到这个结果。

问候
阿里安

Answer 1

你要这个:

@numbers = (1,4,5,6,7,8,9);
foreach my $number (@numbers)
{
    print ("$number\n");
}

与 {1,4,5,6,7,8,9}您实际上是在创建对包含键值对的匿名哈希的引用 (1 => 4, 5 => 6, 7 => 8, 9 => undef) .当你写 @numbers = {1,4,5,6,7,8,9};该引用成为存储在 @numbers 中的唯一标量大批。

此外，如果您只想迭代元素，则无需使用带有计数器的“经典”样式。

你可以做:

for my $number (1 .. 9) {
    print "$number\n";
}

确保您有 use strict; 和 use warnings; 在您编写的每个 Perl 脚本的开头。这些指令启用 perl捕捉错误并警告某些可能有错误的代码。作为初学者，您可能希望将它们与 warnings 结合使用。与 diagnostics以获得更详细的信息。

这些非常方便，尤其是在开始使用 Perl 时，因为它们可以帮助您防止脚中弹。