求教：@{$value}是怎么一回事？

風(fēng)吹不倒

my $value=shift;
        chomp($value);
        foreach my $line (@{$value}) {
                print "$line";
          }
求教額，第一二行是從數(shù)組里取一個值賦給$value并去換行把， 第三行的@{$value}怎么就成了數(shù)組了？

詳見 http://search.cpan.org/~atripps/File-Tail-Multi-0.1/Multi.pm

jason680

sub _read_line {
    my $lines_ref = shift;      
        foreach ( @{$lines_ref} ) {
                chomp;
                next if $_ =~ //;
                #go play, here's the line
        }
  }

chenzq1604

根據(jù)上下文shift 得到 的是一個散列,  

$value=\%rh_value;

@{$value} 是個散列的引用,相當(dāng)于 @rh_value;

flw

抄都不會抄。
人家的 chomp 是在 foreach 里面，不是外面。

風(fēng)吹不倒

回復(fù) 3# chenzq1604


    哈，原來如此，謝謝拉~

風(fēng)吹不倒

回復(fù) 4# flw


    額 代碼修改了幾次，不小心就弄上面去了;
   不過沒發(fā)生問題，不然就發(fā)現(xiàn)了