my %hash; 

foreach $key $value (@keys) {
    $hash($key) = $value;
}