you have a space that shouldn't be there:
> print "THIS DOESN'T WORK: $key $newHash {$key}\n";
^
should be:
print "THIS DOESN'T WORK: $key $newHash{$key}\n";
> -----Original Message-----
> From: Simon Tomlinson [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 18, 2002 9:06 AM
> To: [EMAIL PROTECTED]
> Subject: Array of Hashes
>
>
> Hi
>
> I want to put a hash into each element of an array. I do it
> like the following bit of code. When I iterate round my hash
> before putting it in the array of the hash values/keys are
> there. However, when I iterate through the hash after
> putting it in the array all i get is '4/8' as the ouput.
>
> I am sure this is very simple and I'm doing something stupid.
> Does anyone have any ideas?
>
> Thanks in advance,
> Simon.
>
> my @array
> my $count = 0;
> my $maxCount = 4;
>
> while $count < $maxCount
> {
> my %myHash = &getHash;
>
> foreach $key (keys %myHash )
> {
> print "THIS WORKS: $key $myHash{$key}\n";
> }
>
> # Now assign the hash to my array
> $array[$count] = %myHash;
>
> my %newHash = $array[$count];
> foreach $key (keys %newHash )
> {
> print "THIS DOESN'T WORK: $key $newHash {$key}\n";
> }
> }
>
>
> --
>
> This e-mail may contain confidential and/or privileged
> information. If you are not the intended recipient (or have
> received this e-mail in error) please notify the sender
> immediately and destroy this e-mail. Any unauthorized
> copying, disclosure or distribution of the material in this
> e-mail is strictly forbidden.
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]