my @cols = split(/[,\s]+/);
    my %row;
    $row{quarantined_id} = pop @cols;
    for my $key ( qw( month day time category sender ) )
    {   
        $row{$key} = shift @cols;
    }
    $row{recipients} = \@cols;
    push @{$data{rows}}, \%row;
...
                    [% FOR row=rows %]
                        <tr>
                            <td>[% row.month %] [% row.day %] [% row.time %]</td>
                            <td>[% row.category %]</td>
                            <td>[% row.sender %]</td>
                            <td>[% FOR recipient=row.recipients %][% recipient %]<br />[% END %]</td>
                            <td>[% row.quarantined_id %]</td>
                        </tr>
                    [% END %]