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