Compare NORMAL with a bit of creative indentation ------ sub level1{ if ($level2){ print "Content-type: text/html \n\n". " \n". " \n". " \n". " \n". " \n"; } } with HEREDOC ------- sub level1{ if($level2){ print <