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

##</code><code>##

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

##</code><code>##

$mw->Button(command => \&{$self->func1})->pack

##</code><code>##

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