7 lines
115 B
Perl
7 lines
115 B
Perl
%hash = qw(
|
|
fruit apple
|
|
sandwich hamburger
|
|
drink bubbly
|
|
);
|
|
|
|
print "$hash{'fruit'}\n"; |