[eside-ghost] Uppercase vs. lowercase en pagina web local
STenyaK (Bruno Gonzalez)
stenyak en gmail.com
Jue Feb 7 11:00:56 CET 2008
2008/2/7 Pablo Garaizar Sagarminaga <garaizar en eside.deusto.es>:
> Aupa!
>
> El Thu, 7 Feb 2008 02:28:15 +0100
> "STenyaK (Bruno Gonzalez)" <stenyak en gmail.com> comentaba:
> for FICHERO in $(find . -iname '*.htm')
> do
> cp $F $F.swp
>
> while read LINEA
> do
> if echo $LINEA | grep -qi href
> then
> URL=$(echo $LINEA | sed -e "s/.*[Hh][Rr][Ee][Ff]=\"\(.*\)\"/\1/g)
> URLLOW=$(echo $URL | tr A-Z a-z)
Uhm... no conocía esa forma de usar tr.
echo $LINEA | sed -e "s/$URL/$URLLOW/g"
> else
> echo $LINEA
> fi
>
> done < $F > tmp
>
> mv tmp $F
> done
>
> Habría que apurar más, porque tienen bugs:
>
> - HREFs multilinea
> - Más de un HREF por linea
>
Quedarian tb los <img src="..."/>, seguramente los css, y esperemos que
tenga poco js :-)
Tras una busqueda rapida, veo que con regexps se puede cambiar el case
directamente, asi que si no he metio algun error de sintaxis, creo q esto
deberia funcionar...
perl -pi -e 's/href="\([^"]*\)"/href="\u\1\e"/' *.htm? *.css *.js
El \u y \e delimitan el cacho de texto que se cambiara a lower case. Con \U
y \E lo pasa a upper case. Si se omite \e solo lo aplica al siguiente
caracter. Como se suele decir, un dia sin aprender algo nuevo es un dia
perdido :-)
Habria q extender la expresion para q tb reemplace imgs y demás, claro. Y
que tal vez usen comillas simples en vez de dobles. Lo probaré cuando welva
a casa a ver...
--
Saludos,
Bruno González
_______________________________________________
Msn/Jabber: stenyak AT gmail.com
ICQ: 153709484
http://www.stenyak.com
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: https://listas.deusto.es/mailman/private/eside-ghost/attachments/20080207/ebf194b9/attachment.htm
Más información sobre la lista de distribución eside-ghost