perl -e '$code = sub{ print "Ovid is a blowhard\n" };&$code'