# first you must always print a header line or you will get a 500 error
print "Content-Type: text/html\n\n";
# now you can do this:
print "\nLine1\nLine2\n$some_var\nLine4\n
";
# which is the same as this but not as pretty
# (here I demonstrate the qq operator as well as using literal \n in text
print qq|
Line1
Line2
$some_var
Line4
|;
# alternatively you can use
(here is a demo of herpage notation as well)
print <
Line1
Line2
$some_var
Line4
HTML