$T_testers{$tst}->{'Status_B'}->configure(-text=>"Down",-background => "red" );
$T_testers{$tst}->{"ProgBar"}->configure(-foreground => "red" );$mw->update;