my @row = split(/\s+/,$row);

##</code><code>##

my @row = split' ',$row;