Thread my (%hash1, %hash2) = &gethash; - geht das? (5 answers)
Opened by Dubu at 2004-08-29 19:46

[E|B]
 2004-08-29 20:17
#49699 #49699
User since
2003-08-08
2561 Artikel
HausmeisterIn
[Homepage] [default_avatar]
Ein kurzes Beispiel:

Code: (dl )
1
2
3
4
5
6
7
8
9
sub returnhash {
  my %hash1 = (1 => 3);
  my %hash2 = (2 => 5);
  return [\%hash1, \%hash2];
}

my $refs = &returnhash;
print $refs->[0]->{1};   # 1. Array Element, Schlüssel "1"
print $refs->[1]->{2};   # 2. Array Element, Schlüssel "2"
\n\n

<!--EDIT|[E|B]|1093796269-->
Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

View full thread my (%hash1, %hash2) = &gethash; - geht das?