Перебор элементов массива

Для перебора массивов применяются три цикла— for, while и foreach:
• Цикл for:
@Mass=qw(Один Два Три Четыре); for($i=0; $i<0Mass; $i++) { print "$Mass[$i] ";
} # Один Два Три Четыре
• Цикл While:
@Mass-qw(Один Два Три Четыре);
$i=0;
while($i<@Mass) {
print "$Mass[$i] ";
$i++;
} # Один Два Три Четыре П Цикл foreach:
@Mass=qw(Один Два Три Четыре); foreach $var (0Mass) { print "$var ";
} # Один Два Три Четыре
Если не указать переменную, то при каждой итерации цикла специальной переменной $_ будет присвоено значение элемента массива:
0Mass=qw(Один Два Три Четыре); foreach (@Mass) { print "$_ ";
} # Один Два Три Четыре