带括号和不带括号的 Perl 子声明有什么区别？

Question

两者之间究竟有什么区别（如果有的话）：

sub foobar() {
    # doing some stuff
}

和

sub foobar {
    # doing some stuff
}

我看到了其中的一些，第一个语法有时无法编译。

Answer 1

通过将() 放在子例程名称的末尾，您就是在给它一个原型。原型向 Perl 提供有关您将传递给子例程的参数的数量和类型的提示。详情请见this section in perlsub。

具体来说，() 是一个空原型，它告诉 Perl 这个子例程没有参数，如果你用参数调用这个子例程，Perl 会抛出一个编译错误。这是一个例子：

#!/usr/bin/perl

use strict;
use warnings;
use 5.010;

sub foo {
  say 'In foo';
}

sub bar() {
  say 'In bar';
}

foo();
bar();
foo(1);
bar(1);

由此产生的输出是：

Too many arguments for main::bar at ./foobar line 18, near "1)"
Execution of ./foobar aborted due to compilation errors.

最后一次调用 bar()（参数为 1 的那个）导致了这个错误。

值得注意的是，Perl 的原型实现通常没有人们通常认为的那么有用，而且除了一些特殊情况之外，大多数 Perl 专家都会避开它们。我建议你也这样做。从 Perl v5.22 开始，实验性“签名”功能正在测试中，有望实现其他语言的程序员对原型的期望。