$mw->Button(command => \&$func1($a))->pack