Perl の while 文で continue

Perl の while 文の中で、next とか last とかできるのは知ってたけど

my $counter = 0;
while ($counter < 5) {
    print "$counter\n";
} continue {
    $counter++;
}

とか書けるんか。知らんかった。
while の本体で next ですっとばされても $counter を間違いなくカウントアップできる。便利？

my $counter = 0;
while ($counter < 5) {
    next if $counter < 2;
    print "$counter\n";
} continue {
    $counter++;
}

出力

2
3
4