http://qs321.pair.com?node_id=340172

fxmakers has asked for the wisdom of the Perl Monks concerning the following question:

Hi!

Here's my code:
use threads; use threads::shared; my %hash : shared; my $var = "hello"; $hash{'foo'}{'bar'} = 1; $hash{$var}{'bar'} = 1;
Script is not interpreted and returns: Invalid value for shared scalar at test.pl line 7.
Can't create a shared hash of hashes.
$hash{'foo'} = 1; #works fine.
perl -v: This is perl, v5.8.2 built for cygwin-thread-multi-64int

Any ideas?
Thanks!

-UPDATED POST-

Edited by Chady -- added code tags.