sub Y {goto $_[0] };