no strict 'refs';
  my $subtoexecute = sub{ $thissub->($mw_edit->get('1.0', 'end')) }; 

  my $mw_submit_button = $mw->Button(-text => 'Submit',-background=>'gray',-command=> $subtoexecute )->pack(-side=>'left');