hash mit mehreren arrays

[Erwin]

Moin

hat hier jemand ahnunh wie man in einem hash-element mehrere arrays zuweisen kann?

Nun, mit Refernzen geht das auch

=code
use strict;
my @mens = qw(erwin otto rolf);
my @womans = qw(ulla linna anna);

nun ein array der referencen auf mens und womans

my @peoples = (@mens, @womans);

nun der hash mit einer reference auf die peoples an einen key

my %world = (
 'groupA', @peoples,
);

wir testen die ausgabe

foreach my $key (keys %world){
 print "$key\n";
 my $ref = $world{$key};
 foreach my $ref_peoples(@$ref){
  print "\t$ref_peoples\n";
  my @list_people = @$ref_peoples;
  foreach my $people (@list_people){
   print "\t\t$people\n";
  }
 }
}
=cut

Erwin