$Href = {1 => 100,3 =>300};
my @A;
{ local %G;  *G = $Href; @A = @G->{ (1,3) } }