package My_var; use strict; use warnings; our $test = { 'hash1' => { 'paramA' => '00' , 'paramB' => 'FF' , }, 'hash2' => { 'paramA' => '01' , 'paramB' => '02' , }, 'hash3' => { 'paramA' => '00' , 'paramB' => '03' , }, }; 1; #### #!/usr/local/bin/perl use strict; use warnings; # CPAN package use Data::Dumper; # private package use My_var; print "$My_var::test->{hash1}{paramA}\n"; print Dumper( $My_var::test ); #### 00 $VAR1 = { 'hash1' => { 'paramB' => 'FF', 'paramA' => '00' }, 'hash2' => { 'paramA' => '01', 'paramB' => '02' }, 'hash3' => { 'paramB' => '03', 'paramA' => '00' } };