perl - 包中的类型“-”无效？

Question

注意：顺便说一句，我正在 Perl 5 上使用 Perl/Tk 编写一个 GUI。

我试图执行我的代码，但发现此错误消息：

COUNT 0
Invalid type '-' in pack at pack2.pl line 62.

这是我的应用程序中的第 62 行：

my $be = $f1->BrowseEntry(-label => "Widget $count:",
        -choices => ["right", "left", "top", "bottom"],
        -variable => \$packdirs[$count], -browsecmd => \&repack)
        -pack(-ipady => 5, -side => 'left');

我在我的代码中没有看到任何问题，有人可以帮助我吗？

Answer 1

    -pack(-ipady => 5, -side => 'left');

我想这应该是->pack，不是-pack。您不是调用该->pack()方法，而是调用内置函数并从的返回值中pack减去结果。->BrowseEntry这就是你收到错误的原因。