Programa destinado a contar las etiquetas de un documento escrito en DocBook XML. Este se ha escrito en flex.
El siguiente script en perl cuenta las etiquetas que le pasa el analizador léxico y las muestra por pantalla.
