http://www.perlmonks.org?node_id=543963


in reply to Re^4: recursive anonymous subroutines
in thread recursive anonymous subroutines

s/make_call/Y/?
sub Y {goto $_[0] };