perl - perl 中的“xxx: script”语法是什么？

Question

我有一个这样的脚本，它运行：

#!/usr/bin/env perl
error: print 0x41

我希望这部error:分会触发语法错误，但事实并非如此。有人知道这种语法吗？

Answer 1

这是一个标签。

例如，

OUTER:
for my $x (qw( a b c )) {
   for my $y (1..3) {
      say "$x$y";
      last OUTER if $x eq 'b';
   }
}

输出：

a1
a2
a3
b1