2016年2月18日
perl 遍历对象数组
摘要： my $appsList ; eval { $appsList = $db->query( $sqlstr1 )->hashes->to_array; }; ### $appsList foreach my $item (@$appsList) { my $a = $item->{'apps_nam 阅读全文
posted @ 2016-02-18 10:46 wlyang 阅读(2106) 评论(0) 推荐(0) 编辑