7 lines
141 B
Perl
7 lines
141 B
Perl
|
$hash{fruit} = apple;
|
||
|
|
$hash{sandwich} = hamburger;
|
||
|
|
$hash{drink} = bubbly;
|
||
|
|
|
||
|
|
foreach $value (sort values %hash) {
|
||
|
|
print "$value\n";
|
||
|
|
}
|