6 lines
209 B
Perl
6 lines
209 B
Perl
|
%students=( "Math" => { "A" => 100, "B" => 95 },
|
||
|
|
"Science" => { "C" => 85, "D" => 76 }
|
||
|
|
);
|
||
|
|
print qq/$students{Math}->{Joan}.\n/;
|
||
|
|
print qq/$students{Science}->{Bill}.\n/;
|