sub outer {
	my $x = shift;

	sub inner {
		return $x;
	}
}

##</code><code>##

sub outer {
	my $x = shift;
	my $inner = sub { return $x };
}