$i=0; $line = join '', grep { $i++ % 2 ? {s/,/ /g} : 1} split /"/,$line;