Select Code to Download

use strict;
use warnings;
...

$tableOut->addRow (@$_) for @rows;
$tableOut->print ();

<table>
<tr><td>1</td><td>3</td><td>newText</td></tr>
<tr><td>one</td><td>two</td><td>newText</td></tr>
</table>