+ -
当前位置:首页 → 问答吧 → Perl hash问题

Perl hash问题

时间:2011-03-03

来源:互联网

例子1:
#这个是遍历数据库信息:

  1. my $str;
  2. while ( $sth->fetchrow_array ) {
  3.          $str .= { Type => "$Type", Ip => "$Monitor_Ipaddress", Name => "$ProjectName" } . ",";
  4. }

  5. print "[$str]\n";
复制代码




例子2:

  1. my $r = [ { a => 1, b => 2, c => 3, }, { a => 2, b => 4, c => 6, } ];
  2. print $r;
复制代码




如何让例子1的结构变成跟例子2一样

作者: mitmax   发布时间: 2011-03-03

把匿名hash当字符串连接了你
应该用 push 而不是 .

作者: zhlong8   发布时间: 2011-03-03