my $dtext = $executecommand->Subwidget('text'); $dtext->configure( -background => 'black', -foreground => 'green', );