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

#Introduction sub call_right {}; #starts here BEGIN { $of = 'wisdom is' } &call_right($right,$things,@righttime);

"Keep pouring your ideas"