See here: "$#{@{WA{$key}{stags}}} = $rnds-1;".
I think Perl is complaining about the "$" missing before "WA", but I think that expression really should read "$#{$WA{$key}{stags}} = $rnds-1;". A similar problem appears in your unshift line. See References quick reference.
In reply to Re: Referencing an array in a complex hashed data structure
by kyle
in thread Referencing an array in a complex hashed data structure
by Wiggins
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |