print < HTML with here-docs ... ... more stuff HTML # do some processing for my $item (@items_from_somewhere) { print "
  • $item\n"; } print < HTML