Perl 不会提示缺少分号

Question

我刚刚在我的 Ubuntu 上发现 Perl 并没有提示最后的分号。检查以下代码:

#!/usr/bin/perl
use warnings;
use strict;

my @array = (1, 2, 3, 4);

foreach (@array)
{
    print $_."\n"
}

print "no, this cant be true"

请注意分号“;”缺少打印语句。代码仍然运行良好。

输出:

1
2
3
4
no, this cant be true

如果我在打印后加分号，它仍然有效。所以这让我很困惑。

你能帮我理解我在这里遗漏了什么，或者是否有一些我忽略的明显的 Perl 意识形态？

Answer 1

来自 perldoc perlsyn :

Every simple statement must be terminated with a semicolon, unless it is the final statement in a block, in which case the semicolon is optional.

您的打印语句是块中的最后一个语句。

但不建议省略分号。如果稍后扩展块，很容易忘记添加它。