...or even a HERDOC:

my $page = "<div>hello world</div>\n";
my $x = 'goodbye';

$page .= <<"MORE_HTML";
<div>$x</div>
MORE_HTML

print $page;

--output:--
<div>hello world</div>
<div>goodbye</div>
[download]