use threads;
use threads::shared;
...
share($x);