Question

perl foreach怎么用

Answer 1

foreach $循环变量 (@数组){
....语句....
}

Answer 2

foreach my $k (@arrary)
{
操作
}
省略 $k, 默认perl 内置变量$_
print $_ foreach (@arrary) ;