goto LABEL会导致内存泄漏吗？

经过1分钟的测试，答案似乎是： 是 否（请参阅下面的更新）

top在运行时观看，%MEM持续递增

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

这没有显示相同的递增%MEM计数器

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

更新

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