Select Code to Download

use strict;
use warnings;
...
        $rowName, map {defined $_ ? $_ : ''} @{$rows{$rowName}}{@setNa
+mes}),
        "\n";
}

Name    SET1    SET2    SET3
AA    0    1    0
BB    0        0
CC    2    3