@values = grep { defined } split(/\,/,$rows[$i]);

##</code><code>##

@values = map { defined ? $_ : '' } split(/\,/,$rows[$i]);