通過在Perl中的數組遍歷

Question

嗨我有一個簡單的問題：我如何遍歷數組。下面的數組包含要通過regex命令修改的字符串。

foreach(@array) 
{ 
    $count = 0; 
    @array[$count] =~ /regex here../; 
    $count++; 
} 

我能夠修改數組中的第一個對象，但沒有其他的。任何幫助，將不勝感激。由於

Answer 1

簡單：

foreach(@array) 
{ 
    /regex here../; 
} 

或

foreach my $a (@array) 
{ 
    $a =~ /regex here../; 
} 

或

foreach my $i (0 .. $#array) 
{ 
    $array[$i] =~ /regex here.../; 
}