##
# to print a bunch of HTML using a heredoc I would do:
print <
$title
$data
$some_content
<-- continue -->
HTML
# or you can do this with qq (non interpolated text must not contain ! char)
print qq!
$title
$data
$some_content
<-- continue -->
!;