in reply to Complex Hash of Hashes (New to them)

I am trying to print specific parts of the hash, but not with much success using: print $xml->{'bgp-information'}->{'bgp-peer'}{[0]}->{'peer-address'};
print $VAR1->{'bgp-information'}->{'bgp-peer'}->[0]->{'peer-address'}, +"\n";

Outputs:

1.1.1.1

I am also trying to figure out how I can while loop all the "peer-address" entries (e.g. 1.1.1.1, 2.2.2.2, 3.3.3.3) to print entries within
for (@{$VAR1->{'bgp-information'}->{'bgp-peer'}}){ print $_->{'peer-address'},"\n"; }

Outputs:

1.1.1.1 2.2.2.2 3.3.3.3

citromatik