3 Hashes aus einem Hash erzeugen - #55691 (Allgemeines zu Perl)

Strat

2005-06-23 11:30

User since
2003-08-04
5246 Artikel
ModeratorIn

drei hashes in ein array packen? das geht als Referenz recht einfach? @array = (\%hash1, \%hash2, \%hash3);
und rueckwaerts:

Code: (dl )

1
2
3

%hash1 = %{ $array[0] };
%hash2 = %{ $array[1] };
%hash3 = %{ $array[2] };

oder direkt damit arbeiten:

Code: (dl )

1
2
3

foreach my $key (sort keys %{ $array[1] }) {
  print "$key => $array[1]->{$key}\n";
}

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/