Reply to thread

Message: [QUOTE="A. Sinan Unur, post: 4808602"] $complex_hash{value} is a reference to just a regular hash table. #!/usr/bin/perl use strict; use warnings; use Tie::IxHash; my %complex_hash; tie %complex_hash, 'Tie::IxHash', (One => {}, Two => {}); for my $k (keys %complex_hash) { tie %{ $complex_hash{$k} }, 'Tie::IxHash'; $complex_hash{$k}->{A} = 1; $complex_hash{$k}->{B} = 2; } for my $k (keys %complex_hash) { print "$k\n"; for my $kk (keys %{ $complex_hash{$k} }) { print "\t$kk => $complex_hash{$k}->{$kk}\n"; } } __END__ Sinan [/QUOTE]