$widget(-textvariable=>\$staus)

sub funktion {
$staus = "bereit";
...
mache was
...
$staus = "erledigt";
}