use HTML::Escape 'escape_html'; my $text= collect_output_as_txt( @servers ); my $title= "Report for servers " . join ",", @servers; $text= escape_html( $text ); print < $title
$text
HTML