Select Code to Download

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

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