Chinaunix

标题: 求教：@{$value}是怎么一回事？ [打印本页]

作者: 风吹不倒 时间: 2011-03-16 17:28
标题: 求教：@{$value}是怎么一回事？
my $value=shift;
      chomp($value);
      foreach my $line (@{$value}) {
            print "$line";
      }
求教额，第一二行是从数组里取一个值赋给$value并去换行把，第三行的@{$value}怎么就成了数组了？

详见 http://search.cpan.org/~atripps/File-Tail-Multi-0.1/Multi.pm

作者: jason680 时间: 2011-03-16 17:42
sub _read_line {
my $lines_ref = shift;
      foreach ( @{$lines_ref} ) {
            chomp;
            next if $_ =~ //;
            #go play, here's the line
      }
  }

作者: chenzq1604 时间: 2011-03-16 18:02
根据上下文shift 得到的是一个散列,

$value=\%rh_value;

@{$value} 是个散列的引用,相当于 @rh_value;

作者: flw 时间: 2011-03-16 18:09
抄都不会抄。
人家的 chomp 是在 foreach 里面，不是外面。

作者: 风吹不倒 时间: 2011-03-16 18:46
回复 3# chenzq1604

哈，原来如此，谢谢拉~

作者: 风吹不倒 时间: 2011-03-16 18:50
回复 4# flw

额代码修改了几次，不小心就弄上面去了;
不过没发生问题，不然就发现了

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)