3 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
10
11
12
my @array = (2, 4, 6);
my %hash = (1 => 'eins', 2 => 'zwei', 3 => 'drei',
4 => 'vier', 5 => 'fuen', 6 => 'sex', # etc. ...
);
@teil = @hash{@array};
ausgabe(\@teil);
sub ausgabe {
print "$_\n" for @{$_[0]};
}
3 Einträge, 1 Seite |