Select Code to Download

use strict;
...
    )->pack();
}

my $wt_display_code:shared;
my $wt_data:shared;

$mw->repeat(0.001,sub { display_worker_data() });

my $wt_display_code:shared;
...
       ...
    } etc...
}