El otro dia me topé con una página que hablaba sobre el verdadero coste de los cds y dvds. Dicen unas cuantas verdades, y unas cuantas mentiras blancas (o se decía verdades blancas? weno, dejémoslo en “omisión de datos” :P).
El argumento principal que usan para justificar que sus discos duros son mas baratos, es la mano de obra. Dicen que si un dvd tarda 20 minutos en grabarse, son 20 minutos de tu tiempo que has perdido. Que el tiempo es oro y todo eso.
Estos no han oido hablar de procesamiento en paralelo 😉
En fin, nitpicking aparte, estoy de acuerdo en que se tarda mucho en grabar discos, buscarlos por toda la habitación cuando quieres usarlos, re-grabar a discos nuevos cada N años para por si se deteriora el cd (si, Princo, te estoy mirando a ti ¬_¬), etc…
Y como ando corto de disco duro voy a comprarme uno nuevo en breves. Y, como buen friki que soy, me he preguntao cual salía mas barato por giga. Asi que, ni corto ni perezoso, he cogido /bin/bash y he empezao a codear un parseador del listado web de mod-pc.
Una vez acabado y satisfecho, ejecutando el script me aparece en pantalla cuales son los mas baratos.
Como siempre, me he empezado a ir por las ramas y he hecho el homólogo para pc-box y canal-pc.
Y luego lo he juntado todo.
Dejo aquí el script, con un poco de documentación:
Precondiciones:
-Instalar elinks, awk, sed, grep y similares.
-Navegar con tu navegador hasta la pagina de discos duros de tu tienda pcbox favorita, y guardarla como pcbox.htm.
-Ir a la pagina de canal-pc de discos duros internos y copiar-pegar las filas de discos duros a canalpc.txt
Código
elinks "http://mod-pc.com/modules.php?name=Tienda&op=vcat&cat=D" -dump |grep "HD [S,P]ATA" |cut -c 50- |sed "s/\[[1234567890]*\]//g;s/EUR.*//g;s/^\ *//g;s/PATA/UDMA/g;s/[Gg][Bb]//g" |awk '{ print $7/$5, $7, $5, $3, $1 }'|grep "\."elinks pcbox.htm -dump |grep DISCO |grep -v EXT |grep "\,"|sed "s/DISCO\ //g" |awk -F"|" '{print $2, $3, $4}'|sed "s/\(SATA[2]*\)\ .*\ \ /\1\ /g;s/GB.*SATA/SATA/g;s/GB.*UDMA/UDMA/g;s/UDMA.*\ \ /UDMA\ /g;s/,/\./g" |grep -v "GB" |awk '{print $4/$2, $4, $2, $3, $1}'cat canalpc.txt |sed "s/Serial\ ATA[^\ ]*/SATA/g;s/SATA\ II/SATA2/g;s/ATA[^\ ][^\ ]*/UDMA/g;s/\ Gb/Gb/g;s/^\ *//g;s/\ [^\ ]*[rn]\ Stock//g;s/\.\*//g;s/,/\./g;s/Disco\ .*\(\ [0-9][0-9]*Gb\ .*A\ \).*\ \ *\ \([0-9]*\.\)/\1\2/g;s/Gb//g" |awk '{print $4/$2, $4, $2, $3, $1}'
(fin de código)
Como resultado, un listado con:
precio por giga, precio total, gigas, tipo de conexion, identificador del cacharro usado en la tienda
El script de canal-pc está un poco mal (los ids varían un poco) pero weno. Para que quede más bonito en pantalla sugiero pipear el resultado con esto:
./precios.sh |sort -n -r|cut -c 2- |tr ' ' '\t'
Bueno, hasta aqui todo bien. Ahora toca el verdadero quebradero de cabeza:
¿Cuantos gigas vas a rellenar al año?
¿Cuanto va a bajar el precio de los discos duros?
Y como consecuencia lógica: ¿Cuál es el tamaño óptimo de un disco duro nuevo para no perder dinero por tener unos cuantos gigas sin usar durante un año o más?
Si sabes responder a esas preguntas, invito a que lo compartas con el resto, porque yo personalmente ya he saciado mis ganas de programar (y pensar) por esta semana…
Por cierto, los más baratos son los de Maxtor de 320 y 250 gigas en Canal-PC, a solo 27 eurocents el giga 😉
Leave a Reply