Select Code to Download

use CGI::Ex::Template;
my @a = qw(one two three four five six seven eight);
...

CGI::Ex::Template->new->process(\$temp, {a => \@a}) || die $CGI::Ex::T
+emplate::error;

    <table>
...
        <td></td>
      </tr>
    </table>