Whenever you want a refresh on a time period in Tk, you probably want a timer.
$mw->repeat(1000, \&status_bank);
sub status_bank{
......... do your extraction from file
$mw->update;
}
If you have alot of banks and entries, put them all in a hash,
and loop thru them, like this pseudocode:
my %box_banamex;
$box_banamex{$bank}{'entry'} = $upperframe->Entry(.........
-textvariable => \$box_banamex{$bank}{'status'},
foreach my $bank (keys %box_banamex){
#read each value from file
$box_banamex{$bank}{'status'} = whatever from file parsing;
$box_banamex{$bank}{'entry'}->update;
}