$perl
 perl 
use strict;
use warnings;

my %hash;
$hash{a} = [ 1,2 ];

print "@hash{a}", $/;
Scalar value @hash{a} better written as $hash{a} at - line 7.