my %new_hash;
$new_hash{$_} = [$rep{$_}, $comb{$_}] for keys %rep;

##</code><code>##

my %new_hash = map {($_, [$rep{$_}, $comb{$_}])} keys %rep;