perl - `goto LABEL` 会导致内存泄漏吗？

Question

使用带有标签的 goto 会导致内存泄漏吗？我在 documentation for goto 中找到的所有内容似乎相关的是:

The goto LABEL form finds the statement labeled with LABEL and resumes execution there.

使用goto LABEL安全吗？

Answer 1

经过 1 分钟的测试，答案似乎是:yes no(见下方更新)

在运行时观察 top，%MEM 不断增加

{
    THIS:
    my $x = 1;
    goto THIS;
}

这不会显示相同的递增 %MEM 计数器

while (1) {
    my $x = 1;
}

更新

我误解了这个问题。我对这个问题的看法是，是否会使用 goto 为已经存在于该词法范围中的词法变量分配内存，而我的测试似乎是肯定的。严格来说，这不是内存泄漏。如果 perl 退出这个词法范围，分配的空间将被释放。