$resultline[$rcc] =                 $row[0] . "\t" .
                                $row[1] . "\t" .
                                $row[2] . "\t" .
                                $row[3] . "\t" .
                                $row[4] . "\t" .
                                $row[5] . "\t" .
                                $row[6] . "\t" . 
                                $row[7] . "\t" . 
                                $row[8] . "\t" . 
                                $kinclude . "\n";

##</code><code>##

$resultline[$rcc] = join("\t", @row[0..8]) . "$kinclude\n";