注意:我在 Perl 5 上使用 Perl/Tk
我正在开发一个新应用程序,以查找此错误消息:
unknown option "-browsecmd" at /usr/lib/perl5/Tk/Widget.pm line 205.
at pack2.pl line 76
这是完整的论点:
$f1->Checkbutton(-text => "-expand", -onvalue => 1, -offvalue => 0,
-variable => \$expand[$count], -browsecmd => \&repack)
->pack(-ipady => 5, -side => 'left');
我做错了什么?你能帮助我吗?