my $h2 = { %$hr1 };