Cargando

añadir valor incremental en xml usando perl




Pulsa corazón para recibir avisos de nuevas Respuestas

  AUTOR PREGUNTA

Publicado 07 agosto 2014 - 22:28
¿Existe una forma de añadir un valor incremental al atributo value en cada etiqueta en un xml usando un script en perl?

gracias
  • ¿Tienes la misma pregunta? Yo también
  • Volver arriba

 

Publicado 08 agosto 2014 - 06:45
Si mal no recuerdo debes usar awk

 

Publicado 08 agosto 2014 - 06:45
Usa un parser como awk, te dejo un ejemplo:

awk 'match($0, /<[^\/>]+/) { \ $0 = substr($0, 1, RSTART+RLENGTH-1) " *****=\"" ++i "\"" \ substr($0, RSTART+RLENGTH) \ }; 1'


   AUTOR PREGUNTA

Publicado 08 agosto 2014 - 15:18
Gracias


X