Select Code to Download

$data_tmpl->param(NAME => $name);
my @data;
...
use Data::Dumper; print STDERR Dumper(\@data); # show @data on STDERR
$template->param(DATA => \@data);
# now you can write your file