Select Code to Download

<table>
    <thead>
...
    <!-- /tmpl_loop -->
    </tbody>
</table>

    my @fields = qw(your columns names here);
    $object->get_all(%params);
...
    }
    $template->param(fields =>  \@fields);
    $template->param(data => \@data);