my ($self,%myInputs) = @_;
请向我解释声明,以便我可以继续.
$mw->Button(-text => "RIGHT",-command => sub { exit }) ->pack(-side => 'right',-fill => 'both');