Publicado 04 agosto 2014 - 02:25
Publicado 04 agosto 2014 - 03:42
$ perl -pe 's/no:\d+/no:*****/' < archivo_entrada > archivo_salida
cat input | perl -lne 's/^(.+)no:(\d+)(.*)/print"$1no:","*" x length($2),"$3"/e' > salida
Publicado 04 agosto 2014 - 03:43
perl -i.bak -pe 's/(?<=no:)\d+/****/' archivo
Publicado 04 agosto 2014 - 03:55