$csv->print ($fh1, [$ifile, @cols, @matches ]);