# ALL SAME dump(@$fldref[TXT]); foreach my $tmp (@$fldref[TXT]) { dump($tmp); } my ( $foobar ) = @$fldref[TXT]; dump($foobar); #### foreach my $tmp (@{ $fldref[TXT][0] }) { dump($tmp); }