use threads;
use threads::shared;

my %hash : shared;
my $var = "hello";

$hash{'foo'}{'bar'} = 1; 
$hash{$var}{'bar'} = 1;