La [respuesta de Cuauhtli][1]respuesta de Cuauhtli está muy bien y resuelve el problema correctamente.
Simplemente como referencia y para utilizar otras potencialidades de GNU Awk, veamos cómo hacerlo de otra manera:
gawk -F '' '{for(i=1;i<NF;i++) printf "%s", (i>=12 && i<=15) ? ($i+1)%10: $i; print $NF}'
En GNU Awk es posible definir el separador de campos como la "nada". Con ello, cada carácter es un campo diferente. Esto [se hace indicando -F ''
][2]se hace indicando -F ''
.
De esta manera por ejemplo podemos decir:
$ awk -F '' '{for(i=1;i<=NF;i++) print $i}' <<< "hola"
h
o
l
a
Una vez aprendido esto, ahora es simplemente cuestión de iterar sobre la cadena y modificar los caracteres que hay en la posición 12 a 15, utilizando la lógica de la respuesta de Cuauhtli:
for(i=1;i<NF;i++)
printf "%s", (i>=12 && i<=15) ? ($i+1)%10: $i
print $NF
Es decir, itera sobre todos los caracteres e imprime el carácter en sí ($i
) a menos que esté en la posición 12 a 15, en cuyo caso imprimimos ($i+1)%10
. Esta decisión la tomamos mediante el operador ternario condición ? reacción_si_cierto : reacción_si_falso
.
Finalmente ponemos print $NF
para escribir el último campo y que vaya seguido de un salto de línea, porque printf
no los añade automáticamente y print
sí.
[1]: https://es.stackoverflow.com/a/350384/83
[2]: https://stackoverflow.com/a/31135446/1983854