my %hash3; @hash3{keys(%hash3_origin)} = ([0, 0]) x keys(%hash3_origin);