Cargando

Ir a contenido

X

reemplazar campo en un archivo usando perl





  AUTOR PREGUNTA

Publicado 04 agosto 2014 - 01: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 - 02:42
Utiliza lo siguiente:

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


 

Publicado 04 agosto 2014 - 02:42
Utiliza cat:

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


 

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

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


   AUTOR PREGUNTA

Publicado 04 agosto 2014 - 02:55
Gracias ;)


X