This is perl, v5.8.2 built for MSWin32-x86-multi-thread
Binary build 808 provided by ActiveState Corp. http://www.ActiveState.com

##</code><code>##

P:\test>perl -Mthreads -mthreads::shared
my( %h ) : shared;
my $var = 'hello';
$h{ $var } = 123;
print $h{hello};
^Z
123