my @key=keys %rep;
       for my $key(@key){
       $new_hash{$key}="[$rep{$key},$comb{$key}]";}