for (0..10) { my %sh : shared ; $h{$_}=\%sh ; }