s/^\s*//;
        s/\s*$//;
        if ($_) {
            my @row = split(/\s+­/);

##</code><code>##

        if( /\S/ ) {
            my @row= split ' ', $_;