Select Code to Download

my $comment = Tie::IxHash->new(${$comments}{$key});

comment: $VAR1 = bless( [
                         ...
                         blah blah blah
                         ...
               ], 'Tie::IxHash' );

tie (%comments, Tie::IxHash);
warn ("comment " . Dumper($comments{$key}));