Select Code to Download

<some make up code>
while(($key, $value) = each(%hservers)) {
...
  $hserver{$keyX}->[1]->[0]->[2] ="parX";  #secondpart  
}
</some make up code>

while(($key, $value) = each(%$href)) {
  %$href{$key}->[1]->[0]->[0] = 1; #this gives a syntax error
  %{$href{$key}}->[1]->[0]->[0] = "blah" #gives error
  print "$key\n";  # but when i do this the code prints all the keys o
+f the reference to the hash.  so I assume the the hash was passed thr
+ough correctly
}

$VAR1 = 'server1';
$VAR2 = [
...
            ]
          ]
        ];