use threads qw(stringify);
use threads::shared;
my %contacts : shared;