bronto@marmotta:~/B-Lab/threads$ ./gui.pl
Resetting text box state
Disabling text box
Tk::Error: Not an ARRAY reference at /usr/lib/perl5/Tk/After.pm line 79.
 [once,[{},after#9,idle,once,[ConfigChanged,{},{}]]]
 ("after" script)
Tk::Error: Can't call method "Call" on an undefined value at /usr/lib/perl5/Tk/After.pm line 83.
 [once,[{},after#10,idle,once,[ConfigChanged,{},{}]]]
 ("after" script)