Select Code to Download

while (my @res = $sth->fetchrow_array()) {
    @res = map { defined ? $_ : '' } @res;
    $worksheet->write_row($i, 0, [@res]);
    $i++;
}