1 2 3 4 5 6 7 8 9 10 11
$text = 'Text from a Perl string.'; print <<HTML; <html> <head> <title>Here-Doc Example</title> </head> <body> <h1>Here-Doc Example</h1> <p>$text</p> </body> HTML