Select Code to Download

$ perl -Mstrict -Mwarnings -E 'my %a2 = ( x=>4, y=> scalar (5,7,9) ); 
+say $a2{y}'
Useless use of a constant (5) in void context at -e line 1.
Useless use of a constant (7) in void context at -e line 1.
9

$ perl -Mstrict -Mwarnings -E 'my %a2 = ( x=>4, y=> (5,7,9) ); say $a2
+{y}'
5

$ perl -Mstrict -Mwarnings -E 'my %a2 = ( x=>4, y=> (5,7,9) ); say $a2
+{y}; say $a2{7}'
5
9