Select Code to Download

#!/usr/bin/perl

...
    redo LISTEN ;
  }
}

bronto@marmotta:~/B-Lab/threads$ ./gui.pl
Resetting text box state
...
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)