my $entry = $upperframe->Entry(-textvariable => ...)->pack(...);
  $entry->configure(foreground => ...bank is active... ? 'red' : 'blue');