perl 遍历对象数组

my $appsList ; eval { $appsList = $db->query( $sqlstr1 )->hashes->to_array; }; ### $appsList html foreach my $item (@$appsList) { my $a = $item->{'apps_name'}; ### $a }sql 转载于:https://www.cnblogs.com/

>>阅读原文<<