my %hash;
$hash{ 3,4 } = qw( perl hacker );
print $hash{ 3,4 }, "\n";