$mw->Button(-text => "Bla")->pack(-fill => "x")