Select Code to Download

my $t_button = $mw->Button(-text=>'OK',
                           -command=>sub{exit});

my $t_button = $nb->Button(-text=>'OK',
                           -command=>sub{exit});