print "$_ => $Hash1{$_}\n" for keys %Hash1;