elsif ($data[2] eq "mc") {
   print join("\t",@data[7,8,9,10,11])