{ print "A\n"; FOO: { print "B\n"; { last FOO; print "C\n"; } print "D\n"; } # last jumps here print "E\n"; }