$i = 1;
{
    print "Foo\n";
    last if $i++ > 2;
} continue {
    next if $i < 3;
    last;
}