Select Code to Download

my $mw = MainWindow->new;

...
             print $buttons{$_[0]}->cget('-text')," button is yellow n
+ow\n";
}