mergeFiles(const char* path="/alice/cern.ch/user/m/mercedes/muonAnalysis/output/Bntkine/200007", 
	   const char* pattern="root_archive", 
	   const char* file="#bNtKineAnalysis_singleM.root", 
	   const char* outfile="bNtKineAnalysis_singleM_test.root"){
  
  TGrid::Connect("alien://");
    
  TGridResult* result = gGrid->Query(path,pattern);
  result->Print();
  TFileMerger m;
  if (outfile) m.OutputFile(outfile);
  Int_t i=0;
  TString fName = 0x0;

  while (result->GetKey(i,"turl")) {
    fName = result->GetKey(i,"turl");
    fName += file;
    cout << endl;
    //cout << fName << endl;
    m.AddFile(fName); 
    i++;
  }

  if (i) m.Merge();
  printf("Number of merged file = %d\n",i);
}