eval sub { 'print "I love perl\n;" }