$mw->Button(command => \&some_func)->pack();

##</code><code>##

$mw->Button(command => sub {$obj->some_func($param1, $param2)})->pack();