$angel = $MW->Button( -text => 'Launch Scripts', -command => sub { print STDERR "Launching..."; system("./scriptname"); }, ); ##not sure why you're using exit, so I left it out.