Select Code to Download

Select or download this

my $run_all=$mwb_final->Button(
    -text => 'RunAll',
    -width => 100,
...

        #$_->join for @jobs; # Wait for everything to finish.
    })->pack();

Select or download this

  > Thread 1 terminated abnormally: Can't call method "tagAdd" on an u
+ndefined value at /usr/pkgs/perl/5.14.1-threads/lib64/module/default/
+x86_64-linux-thread-multi/Tk/Text.pm line 158.
Thread 2 terminated abnormally: Can't call method "tagAdd" on an undef
+ined value at /usr/pkgs/perl/5.14.1-threads/lib64/module/default/x86_
+64-linux-thread-multi/Tk/Text.pm line 158.
Attempt to free non-existent shared string '_ErrorInfo_', Perl interpr
+eter: 0x602010 at /usr/pkgs/perl/5.14.1-threads/lib64/module/default/
+x86_64-linux-thread-multi/Tk.pm line 424.