Thanks for your input.
You're right, the main reason I didn't complete all of the tco's was so as not
to unnecessarily clutter an already complex example. I'll take what
you've said on board though, and provide a completely optimized
version in addition.
Bill H
perl -e 'print sub { "Hello @{[shift]}!\n" }->("World")'