print qq(

$string

\n); print qq{

$string

\n}; print qq#

$string

\n#; print qq!

$string

\n!; # have to escape the delimiter: print qq/

$string<\/h1>\n/;