Cargando

reemplazar campo en un archivo usando perl




Pulsa corazón para recibir avisos de nuevas Respuestas

  AUTOR PREGUNTA

Publicado 04 agosto 2014 - 02:25
¿En perl existe una manera de reemplazar un campo en particular en un archivo?
  • ¿Tienes la misma pregunta? Yo también
  • Volver arriba

 

Publicado 04 agosto 2014 - 03:42
Utiliza lo siguiente:

$ perl -pe 's/no:\d+/no:*****/' < archivo_entrada > archivo_salida


 

Publicado 04 agosto 2014 - 03:42
Utiliza cat:

cat input | perl -lne 's/^(.+)no:(\d+)(.*)/print"$1no:","*" x length($2),"$3"/e' > salida


 

Publicado 04 agosto 2014 - 03:43
Prueba con lo siguiente te debe funcionar:

perl -i.bak -pe 's/(?<=no:)\d+/****/' archivo


   AUTOR PREGUNTA

Publicado 04 agosto 2014 - 03:55
Gracias ;)


X