in reply to threads join()

Perl threads is something fake. All variables are made a copy for each thread by default. See threads::shared.