sub template {
  return join ',', map length($_), shift =~ /(X+)/g;
}