my %h1 = qw{a 1 b 2};
*h2 = \%h1;             # Create and initialise glob
print %{*h2}, "\n";     # Access hash referenced by glob