my @ref = @{
    $dbh->selectcol_arrayref(
        "select date, label, subject from travel
         where date>= curdate()-5 order by date",
         {Columns=>[1,2,3]}
    )
};