goto 和 func; 之间有什么区别吗？和功能；在 Perl 中？

Question

goto &func;

&func;

经过一番测试，他们两个看起来很相似，是这样吗？

Answer 1

有很大的区别。检查这里： perl-goto

Answer 2

您运行了错误的测试。使用 caller 来查看发生了什么。

#!/usr/bin/perl

use strict;
use warnings;

sub foo {
  my $level = 0;
  while (my $sub = (caller($level))[3]) {
    print "$sub\n";
    ++$level;
  }
  print "\n";
}

sub bar {
  print "sub:\n";
  &foo;
}

sub baz {
  print "goto:\n";
  goto &foo;
}

bar();
baz();

当你运行它时，你会看到类似以下内容：

$  ~/stuff/goto
sub:
main::foo
main::bar

goto:
main::foo