Select Code to Download

print(Dumper(@array));  -> print(Dumper(\@array));
print(Dumper(%hash));   -> print(Dumper(\%hash));
print(Dumper($a_ref));  -> ok
print(Dumper($h_ref));  -> ok

my @array = (
   [
...
      print($city->{State}, "\n");  # with key State.
   }
}

my @array = (
   {
...
foreach my $city (@array) {      # which contains refs to hashes
   print($city->{State}, "\n");  # with keys State.
}