連想配列の要素に配列を入れるのってどうやるの?

@tmp = ($a, $b, $c);
$data{$key} = @tmp;
print $data{$key}[0] . "\n";

これで上手くいかないのはなぜ?