use CGI 'escapeHTML'; # needs to import &escapeHTML somewhere

print <<HTML;
   <pre>
   @{[escapeHTML($joined)]}
   </pre>
HTML