Another way to do it besides what others have already told you is to use a closure

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