while (<FILE>) {
    print join ",", split( " ", $_, 6 );
}