Ugly! :-)
Ok, I admit I wasn't aware that the warning could be disabled, but in any case for truly deep recursion, such as when continuation passiing, you might want to do this rather than actually running out of memory/stack.
Bill H
perl -e 'print sub { "Hello @{[shift]}!\n" }->("World")'