perl - Perl 可以在动态结构中管理子程序吗？

Question

我有一组解析函数。其中一些我需要申请，具体取决于上下文。我可以在 Perl 中管理数组或其他东西中的函数，例如在 JS 中吗？

Answer 1

是的，Perl 和 Javascript 一样是一种函数式语言。基本上，您替换function并sub省略了函数原型。这是打印出某些内容的三个 subs 的示例：

my @subs = (
  sub {print "Sub 1\n"},
  sub {my ($arg) = (@_, 2); print "Sub $arg\n"},
  \&my_function
);
sub my_function {
  print "Sub 3\n"
}

foreach my $function (@subs) {
  $function->("Argument");
}

印刷

Sub 1
Sub Argument
Sub 3

Answer 2

是的。sub {...}在 Perl 中就像function () {...}在 JavaScript 中一样。