Here is my code.
my $hash1 = $hash0->{unknown}{unknown}; while ( my ( $var, $hash2 ) = each %$hash1 ) { ... }
Am hitting the error "Can't use string ("package") as a HASH ref while "strict refs" in use" when I try to access my $hash1 = $hash0->{unknown}{unknown}from the below hash.
print Dumper $hash0; $VAR1 = bless( { 'branch' => bless( { 'lib/sample/sp.pm' => bless( { 'branch' => bless( { 'lib/sample/sp.pm'=> bless( { 'sample::sp' => '1' }, 'DBM::Deep::Hash' ) }, 'DBM::Deep::Hash' ), 'branch' => $VAR1->{'branch'}{'lib/sample/sp.pm'}{'branch'} }, 'DBM::Deep::Hash' ) }, 'DBM::Deep::Hash' ), 'main' => bless( {}, 'DBM::Deep::Hash' ), 'main' => $VAR1->{'main'} }, 'DBM::Deep::Hash' );
I went through many forums and my understanding on this error is, will hit this when $hash->{unknown}{unknown} has a string instead of hash (I am dereferencing $hash1 in next step of my code). But I don't see any string values('package' as indicated in error message) in the hash but still it complains. Am getting this error for the statement my $hash1 = $hash0->{unknown}{unknown}; Can some one please help me in understanding the issue.
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |