You can put it in a block...

KARL: {
    if ($x) {
        $y or last;
        print "Continue with the if clause\n";
    }
}
[download]

...if you really need it.

Regards, Karl