%hash=();
$hash{x}{@keys} = @values;
print Dumper(\%hash);