$mw->Label(-textvariable => \$rightwrong,
           -foreground => $colour)->pack(-side=> 'bottom');

##</code><code>##

my $RWWidget = $mw->Label(-textvariable => \$rightwrong,
           -foreground => $colour)->pack(-side=> 'bottom');

##</code><code>##

$RWWidget->configure(foreground => $colour);