Select Code to Download

our $count = 0;
sub my_callback {
...
$thread->join;

print "count = $count\n"; # prints 0