$widget->Button(-text=>"mybutton",-command=>sub { mysub("a1","a2",@_) };