my @arrH = (
{ 'name' => 'getTapsArmPTDetailPl_sp', 'type' => 'P ' },
{ 'name' => 'getTapsFRPTDetailPl_sp', 'type' => 'P ' }
);
my $arRef = \@arrH;
我想打印每个元素..
答案 0 :(得分:3)
use feature 'say';
for (@arrH) {
say for values %$_;
}
或者,如果用“element”表示键和值:
for (@arrH) {
while (my ($k, $v) = each %$_) {
say join " => ", $k, $v;
}
}
或者,如果您只想查看数据结构中的内容:
use Data::Dumper;
print Dumper \@arrH;