$ perl -le'print "Hello, World!";'
Hello, World!

$ perl -le'eval q{print "Hello, World!";};'
Hello, World!