Leser: 1
6 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
my %multihash = (
jarich => {
company => "Perl Training Australia",
name => "Jacinta Richardson"
},
pjf => {
company => "Perl Training Australia",
name => "Paul Fenwick"
},
fred => {
company => "XYZ Retail",
name => "Fred Bloggs",
}
);
print $multihash{jarich}->{name},"\n";
# jetzt will ich den Multihash erweitern
push(@{$multihash->{'jarich'}}, {test => "neuer wert"});
print $multihash{jarich}->{test},"\n";
$multihash{jarich}->{test} = 'neuer wert';
6 Einträge, 1 Seite |