- or download this
my $button1 = $mw->Button(-text => "18-Letters",
-command => sub {print OUTFILE "18L\n", back
+ground => "yellow"})->pack(-side =>"top");
- or download this
my $button1 = $mw->Button(-text => "18-Letters",
-command => sub {print OUTFILE "18L\n" },
-background => "yellow"})->pack(-side =>"top
+");
- or download this
sub { print OUTFILE "18L\n", background => "yellow" }
- or download this
sub { print OUTFILE "18L\n", "background", "yellow" }