7 lines
138 B
Perl
7 lines
138 B
Perl
$hash{fruit} = orange;
|
|
$hash{sandwich} = club;
|
|
$hash{drink} = lemonade;
|
|
|
|
foreach $key (keys %hash) {
|
|
print $hash{$key} . "\n";
|
|
} |