continue

continue BLOCK

　foreachやwhileと一緒に使います。ループの条件文が再評価される直前にBLOCKの処理を実行します。
　ループから抜けるlast実行時や、ループの先頭に戻るredo実行時にはBLOCKは処理されません。

use strict;
use warnings;

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

　上記はforで以下のように書けます。

use strict;
use warnings;

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