Mehrdimensionales Array

[Marcel]

Hallo

Ich möchte ein Mehrdimensionales Array, bzw. den Hash ausgeben. Wie muss ich das machen? Ich hab folgendes versucht, was aber einen Fehler generiert:

  
sub myforeach {  
 my %a  = (A => "Hello", B => "World");  
 my %b  = (A => "Hallo", B => "Welt");  
  
 my @data = ([%a], [%b]);  
  
 foreach(@data) {  
   print ($_{A} . "\t" . $_{B});  
 }  
}  

Gruss Marcel