print join(",",split(/\s+/,$line,7)),"\n";