{
  local $/ = q{};
  for (@ThisFileArray) {
    chomp;
    push @NewTextArray, qq{<p>$_</p>\n};
	}

}
        push(@FormattedParagraphs,@NewTextArray);
	    @NewTextArray = "";