Help for this page
s/^\s*//; s/\s*$//; if ($_) { my @row = split(/\s+/);
if( /\S/ ) { my @row= split ' ', $_;