Help for this page

Select Code to Download


  1. or download this
            s/^\s*//;
            s/\s*$//;
            if ($_) {
                my @row = split(/\s+­/);
    
  2. or download this
            if( /\S/ ) {
                my @row= split ' ', $_;