# in ConfigRead.pm sub readConfigFile { ... return \%User_Preferences; }; # main program my $config = ConfigFileRead::readConfigFile(); print Dumper $config;