Perl中的循环结构怎么编写

在Perl中，常见的循环结构有for循环、while循环、do-while循环和foreach循环。这些循环结构的使用方法如下：

1. for循环：

for (my $i = 0; $i < 10; $i++) {
    print $i, "\n";
}

2. while循环：

my $i = 0;
while ($i < 10) {
    print $i, "\n";
    $i++;
}

3. do-while循环：

my $i = 0;
do {
    print $i, "\n";
    $i++;
} while ($i < 10);

4. foreach循环（用于遍历数组或列表）：

my @array = (1, 2, 3, 4, 5);
foreach my $element (@array) {
    print $element, "\n";
}

除了以上常见的循环结构之外，Perl还提供了更多的循环控制语句和模块，如last、next、redo等，可以根据具体的需求选择合适的循环结构。