Select Code to Download

use strict;
use warnings;
...
$table->process( \$tmpl, { rows => \@data }, \$html ) or warn $table->
+error, $/;

print $html;