Por defecto en bash sólo se pueden retornar enteros. ¿Qué hay que hacer entonces para que retorne un valor no entero? El truco está en hacer un echo del valor y asegurarnos en la llamada de la función que se asigna a una variable. Es decir, nuestra función sería:
|
1 2 3 4 5 6 7 |
#!/bin/bash function retorna_texto { echo -n "este es el valor a retornar" } VALOR=$( retorna_texto ) echo $VALOR exit |
Este programa imprime la lista de todas las palabras diferentes usadas en un texto, junto con la frecuencia de aparición de cada una. Para simplificar el programa se asume que no hay signos de puntuación, y las palabras están separadas por espacio en blanco o saltos de línea. Esto significa que cada palabra es un campo de la línea de entrada.
Código del programa (vocabulario.awk):
|
1 2 3 4 5 6 7 8 9 10 11 |
{ for (k=1; k<=NF; k++) { cuenta[$k]++ } } END { for (pal in cuenta) { print pal, cuenta[pal] } } |
Ejemplo de texto de entrada (texto.txt):
|
1 2 3 4 5 6 7 8 |
Este programa imprime la lista de todas las palabras diferentes usadas en un texto, junto con la frecuencia de aparición de cada una. Para simplificar el programa se asume que no hay signos de puntuación, y las palabras están separadas por espacio en blanco o saltos de línea. Esto significa que cada palabra es un campo de la línea de entrada. |
Orden de ejecución :
|
1 |
awk -f vocabulario.awk texto.txt |
Resultados:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
entrada. 1 Esto 1 no 1 frecuencia 1 palabra 1 el 1 con 1 palabras 2 todas 1 lista 1 imprime 1 programa 2 línea 1 Para 1 campo 1 que 2 ... etc. ... |
Observaciones:
1.- La primera cláusula del programa tiene el patrón omitido. Se aplica a todas las líneas del texto de entrada.
2.- Las palabras en mayúsculas y en minúsculas se tratan como diferentes. Este es el comportamiento por defecto de AWK.
3.- Los resultados no aparecen en orden alfabético (ni en ningún otro orden determinado). Las tablas suelen implementarse internamente como tablas «hash», y sus elementos se recorren en el orden que haya decidido quien construyó el intérprete.
SED (Stream EDitor) es un editor de flujos y ficheros de forma no interactiva. Permite modificar el contenido de las diferentes líneas de un fichero en base a una serie de comandos o un fichero de comandos (-f fichero_comandos).
Sed recibe por stdin (o vía fichero) una serie de líneas para manipular, y aplica a cada una de ellas los comandos que le especifiquemos a todas ellas, a un rango de las mismas, o a las que cumplan alguna condición.
Por ejemplo:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Sustituir apariciones de cadena1 por cadena2 en todo el fichero: # sed 's/cadena1/cadena2/g' fichero > fichero2 Sustituir apariciones de cadena1 por cadena2 en las líneas 1 a 10: # comando | sed '1,10 s/cadena1/cadena2/g' Eliminar las líneas 2 a 7 del fichero # sed '2,7 d' fichero > fichero2 Buscar un determinado patrón en un fichero: # sed -e '/cadena/ !d' fichero Buscar AAA o BBB o CCC en la misma línea: # sed '/AAA/!d; /BBB/!d; /CCC/!d' fichero Buscar AAA y BBB y CCC: # sed '/AAA.*BBB.*CCC/!d' fichero Buscar AAA o BBB o CCC (en diferentes líneas, o grep -E): # sed -e '/AAA/b' -e '/BBB/b' -e '/CCC/b' -e d # gsed '/AAA\|BBB\|CCC/!d' |
Formato de uso
El formato básico de uso de sed es:
|
1 |
sed [-ns] '[direccion] instruccion argumentos' |
Donde:
[direccion] es opcional, siendo un número de línea (N), rango de números de línea (N,M) o búsqueda de regexp (/cadena/) indicando el ámbito de actuación de las instrucciones. Si no se especifica [direccion], se actúa sobre todas las líneas del flujo.
Instruccion puede ser:
i = Insertar línea antes de la línea actual.
a = Insertar línea después de la línea actual.
c = Cambiar línea actual.
d = Borrar línea actual.
p = Imprimir línea actual en stdout.
s = Sustituir cadena en línea actual.
r fichero = Añadir contenido de «fichero» a la línea actual.
w fichero = Escribir salida a un fichero.
! = Aplicar instrucción a las líneas no seleccionadas por la condición.
q = Finalizar procesamiento del fichero.
-n: No mostrar por stdout las líneas que están siendo procesadas.
-s: Tratar todos los ficheros entrantes como flujos separados.
EJEMPLOS DE SUSTITUCION :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Reemplazar cadenas: # sed 's/^Host solaris8/Host solaris9/g' fichero > fichero2 Reemplazar cadenas sólo en las lineas que contentan una cadena: # sed '/cadena_a_buscar/ s/vieja/nueva/g' fichero > fichero2 Reemplazar cadenas sólo en en determinadas líneas: # sed '5,6 s/vieja/nueva/g' fichero > fichero2 Reemplazar multiples cadenas (A o B): # sed 's/cadenasrc1\|cadenasrc2/cadena_nueva/g' Sustituir líneas completas (c) que cumplan o no un patrón: # echo -e "linea 1\nlinea 2" | sed '/1/ cPrueba' Prueba linea 2 # echo -e "linea X 1\nlinea 2" | sed '/1/ !cPrueba' linea 1 Prueba |
EJEMPLOS DE INSERCION :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
Insertar 3 espacios en blanco al principio de cada línea: # sed 's/^/ /' fichero Añadir una línea antes o despues del final de un fichero ($=última línea): # sed -e '$i Prueba' fichero > fichero2 # sed -e '$a Prueba' fichero > fichero2 Insertar una linea en blanco antes de cada linea que cumpla una regex: # sed '/cadena/{x;p;x;}' fichero Insertar una linea en blanco detras de cada linea que cumpla una regex: # sed '/cadena/G' fichero Insertar una linea en blanco antes y despues de cada linea que cumpla una regex: # sed '/cadena/{x;p;x;G;}' fichero Insertar una línea en blanco cada 5 líneas: # sed 'n;n;n;n;G;' fichero Insertar número de línea antes de cada línea: # sed = filename | sed 'N;s/\n/\t/' fichero Insertar número de línea, pero sólo si no está en blanco: # sed '/./=' fichero | sed '/./N; s/\n/ /' Si una línea acaba en \ (backslash) unirla con la siguiente: # sed -e :a -e '/\\$/N; s/\\\n//; ta' fichero |
EJEMPLOS DE SELECCION/VISUALIZACION :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 |
Ver las primeras 10 líneas de un fichero: # sed 10q Ver las últimas 10 líneas de un fichero: # sed -e :a -e '$q;N;11,$D;ba' Ver un rango concreto de líneas de un fichero: # cat -n fich2 | sed -n '2,3 p' 2 linea 2 3 linea 3 (Con cat -n, el comando cat agrega el número de línea). (Con sed -n, no se imprime nada por pantalla, salvo 2,3p). Ver un rango concreto de líneas de varios ficheros: # sed '2,3 p' * linea 2 fichero 1 linea 3 fichero 1 linea 2 fichero 2 linea 3 fichero 2 (-s = no tratar como flujo sino como ficheros separados) Sólo mostrar la primera linea de un fichero: # sed -n '1p' fichero > fichero2.txt No mostrar la primera linea de un fichero: # sed '1d' fichero > fichero2.txt Mostrar la primera/ultima línea de un fichero: # sed -n '1p' fichero # sed -n '$p' fichero Imprimir las líneas que no hagan match con una regexp (grep -v): # sed '/regexp/!d' fichero # sed -n '/regexp/p' fichero Mostrar la línea que sigue inmediatamente a una regexp: # sed -n '/regexp/{n;p;}' fichero Mostrar desde una expresión regular hasta el final de fichero: # sed -n '/regexp/,$p' fichero Imprimir líneas de 60 caracteres o más: # sed -n '/^.\{60\}/p' fichero Imprimir líneas de 60 caracteres o menos: # sed -n '/^.\{65\}/!p' fichero # sed '/^.\{65\}/d' fichero Ver las primeras 10 líneas de un fichero: # sed 10q Ver las últimas 10 líneas de un fichero: # sed -e :a -e '$q;N;11,$D;ba' Ver un rango concreto de líneas de un fichero: # cat -n fich2 | sed -n '2,3 p' 2 linea 2 3 linea 3 (Con cat -n, el comando cat agrega el número de línea). (Con sed -n, no se imprime nada por pantalla, salvo 2,3p). Ver un rango concreto de líneas de varios ficheros: # sed '2,3 p' * linea 2 fichero 1 linea 3 fichero 1 linea 2 fichero 2 linea 3 fichero 2 (-s = no tratar como flujo sino como ficheros separados) Sólo mostrar la primera linea de un fichero: # sed -n '1p' fichero > fichero2.txt No mostrar la primera linea de un fichero: # sed '1d' fichero > fichero2.txt Mostrar la primera/ultima línea de un fichero: # sed -n '1p' fichero # sed -n '$p' fichero Imprimir las líneas que no hagan match con una regexp (grep -v): # sed '/regexp/!d' fichero # sed -n '/regexp/p' fichero Mostrar la línea que sigue inmediatamente a una regexp: # sed -n '/regexp/{n;p;}' fichero Mostrar desde una expresión regular hasta el final de fichero: # sed -n '/regexp/,$p' fichero Imprimir líneas de 60 caracteres o más: # sed -n '/^.\{60\}/p' fichero Imprimir líneas de 60 caracteres o menos: # sed -n '/^.\{65\}/!p' fichero # sed '/^.\{65\}/d' fichero |
EJEMPLOS DE BORRADO :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 |
Eliminar un rango concreto de líneas de un fichero: # sed '2,4 d' fichero > fichero2.txt Eliminar todas las líneas de un fichero excepto un rango: # sed '2,4 !d' fichero > fichero2.txt Eliminar la última línea de un fichero # sed '$d' fichero Eliminar desde una línea concreta hasta el final del fichero: # sed '2,$d' fichero > fichero2.txt Eliminar las líneas que contentan una cadena: # sed '/cadena/ d' fichero > fichero2.txt # sed '/^cadena/ d' fichero > fichero2.txt # sed '/^cadena$/ d' fichero > fichero2.txt Eliminar líneas en blanco (variación del anterior): # comando | sed '/^$/ d' # sed '/^$/d' fichero > fichero2.txt Eliminar múltiples líneas en blanco consecutivas dejando sólo 1: # sed '/./,/^$/!d' fichero Añadir una línea después de cada línea: # echo -e "linea 1\nlinea 2" | sed 'aPrueba' linea 1 Prueba linea 2 Prueba Eliminar espacios al principio de línea: # sed 's/^ *//g' fichero Eliminar todos los espacios que haya al final de cada línea: # sed 's/ *$//' fichero Eliminar espacios sobrantes a principio y final de línea, o ambos: # sed 's/^[ \t]*//' fichero # sed 's/[ \t]*$//' fichero # sed 's/^[ \t]*//;s/[ \t]*$//' fichero Eliminar tags HTML: # sed -e :a -e 's/<[^>]*>//g;/</N;//ba' fichero Borrar líneas duplicadas no consecutivas de un fichero: # sed -n 'G; s/\n/&&/; /^\([ -~]*\n\).*\n\1/d; s/\n//; h; P' fichero Eliminar líneas en blanco y comentarios bash: # comando | sed '/^$/ d' # sed '/^$/d; / *#/d' fichero > fichero2.txt |
USO DE SALIDA SELECTIVA :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
Salir a nuestra voluntad antes de acabar el fichero: # sed -e '/uno/ s/uno/1/' -e '/salir/ q' fichero > fichero2.txt # sed 10q fichero # sed q fichero Equivalencia de -e con ";": # sed -e '/AAA/b' -e '/BBB/b' -e 'd' == sed '/AAA/b;/BBB/b;d' Usar 'q' apropiadamente reduce tiempo de procesamiento: # sed -n '10,20p' fichero # sed -n '21q;10,20p' fichero -> Más rápido que el anterior. Conversión de CRLF de DOS a formato UNIX (LF): # sed 's/.$//' fichero Conversión de LF de UNIX a formato DOS (CRLF): # sed 's/$'"/`echo \\\r`/" fichero Obtener el Subject de un correo, pero sin cadena "Subject: ": # sed '/^Subject: */!d; s///;q' fichero Imprimir párrafo (cadenas entre 2 líneas en blanco) si contiene XXX: # sed -e '/./{H;$!d;}' -e 'x;/XXX/!d;' fichero Imprimir párrafo si contiene (1) XXX y ZZZ o bien (2) XXX o ZZZ : # sed -e '/./{H;$!d;}' -e 'x;/XXX/!d;/ZZZ/!d' # sed -e '/./{H;$!d;}' -e 'x;/XXX/b' -e '/ZZZ/b' -e d |
Referencias
http://www.linuxhowtos.org/System/sedoneliner.htm?ref=news.rdf
El siguiente SCRIPT permite invertir un texto ingresado como parametro :
|
1 2 3 4 5 6 7 8 9 10 |
#!/bin/bash input="$1" reverse="" len=${#input} for (( i=$len-1; i>=0; i-- )) do reverse="$reverse${input:$i:1}" done echo "$reverse" exit |
Pra ejecutarlo :
|
1 |
bash prueba.sh "Esta es una prueba" |
Con lo cual se obtiene el siguiente resultado :
|
1 |
abeurp anu se atsE |
El siguiente codigo permite cambiar texto en archivos. Cambia todas las ocurrencias encontradas (para este caso cambia $text1 por $text2).-
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
#!/bin/bash ruta="/rut01/home/prueba" text1="/rut01/home1/monitor" text2="/rut99/home2/jose" archivos="$ruta/archivos.txt" # Genera un archivo con el nombre de todos los archivos con extensión .sh ls -1 $ruta/*.sh > $archivos # Procede a leer cada linea del archivo genrado cat $archivos | while read line;do # procede a realizar el cambio de la variable contenida en $text1 por $text1 perl -pi -e "s[$text1][$text2]g" $line done exit |
Otra opción si es que no se tiene instalado el comando «perl» se puede realizar con el comando «sed» de la siguiente forma (Cambiando la linea del comando «perl» por la del comando «sed») :
|
1 |
sed 's/$text1/$text2/g' $line > $line.tmp && mv $line.tmp $line |
