package Two; use One; $hash = &One::query(); %hash = %$hash;