{ 
  state = substr($0, 98, 15)
  if ((index(state, "Texas") != 0) || (index(state, "texas") != 0)) {
    family = substr($0, 13, 20)
    genus = substr($0, 33, 20)
    species = substr($0, 53, 20)
    infra = substr($0, 73, 20)
    county = substr($0, 113, 15)
    print genus "," species "," infra "," family "," county 
  }
}