Recopilando los Bruce Schneier Facts
Anoche, tras ver la noticia en meneame hice un script en perl, que con un poquito de bash scripting sirveron para recopilar los más de 100 facts sobre Bruce Schneier, que había en ese momento. Aquí va todo el material:
Orden para ejecutarlo:
pepito@grillo ~$ while [ 1 ]; do wget http://geekz.co.uk/schneierfacts/ -O – 2>/dev/null| ./doo.pl; sleep 10; done;
(se deja un rato, y Ctrl-C)
pepito@grillo ~$
Script en perl (¡guardadlo con permisos de ejecución!) y todas las frases.
Si abrís el archivo y os fijáis, todas acaban en #. De todas las peticiones que se hicieron, es el número de ellas en la que la frase ya estaba en la base de datos. Así, #12 indica que de todas las peticiones se recibieron 12 con esa frase, #1 que se recibió esa frase sólo una vez (creo que no hay ninguna de 1, de 2 hay una, de 3 hay tres, apañaos con grep \#$ frases.txt para saber cuántas líneas acaban en #) . Guardé ese dato para rayarme con el generador de números aleatorios que usa el servidor (la implementación de php). Si lo hago ya lo contaré. Se elimina con sed s/\#[0-9][0-9]//g bruce.db | sed s/\#[0-9]//g -, igualmente las entidades XML tal como ” se reemplazan por su versión texto con secuencias como sed s/\"\;/\”/g bruce.db
Por ahora nada más, cuando tenga algo más interesante que contar lo pondré por aquí
