#--------- 1 ------------
sub foo {
	&bar;
}

sub bar {
 	if ($negative) {
		exit();
	}
	return();
}

##</code><code>##

#--------- 2 ------------
sub foo {
	goto &bar;
}