En la lista de correo debian-devel-spanish, apareció un hilo sobre España en las DWN, que acabó derivando en una consulta lingüística, y en unos scripts para consultar la página del diccionario de la RAE. Para disfrute de todos, os los recopilo aquí.

Os pongo ambos, y os quedáis con el que más os interese.
drae.sh, por Javier Carranza (posteado por Teófilo Ruíz Suárez)

#!/bin/bash
trap “rm -rf /tmp/drae.$$” 1 2 3 9 15
lynx -dump –nolist “http://buscon.rae.es/draeI/SrvltGUIBusUsual?TIPO_HTML=2&LEMA=$1” > /tmp/drae.$$
cat /tmp/drae.$$ 2> /dev/null | tail -n $((`wc -l /tmp/drae.$$ 2> /dev/null | awk ‘{ print $1 ;}’`-2)) | more
echo
if [ -f /tmp/drae.$$ ]
then rm /tmp/drae.$$
fi

Una versión ampliada por Javier Fernández-Sanguino Peña, y con correcciones gracias a Marcelo E. Magallón

#!/bin/bash
# Programa para acceder al diccionario de la RAE
# (c) 2003 Javier Fernandez-Sanguino Peña
# Distribuido bajo los términos de la licencia GNU GPL
# ver http://www.gnu.org

error () {
# Salir con error
echo “ERROR: $1”
exit 1
}

setup () {
# Definir el entorno inicial

[ -z “$PAGER” ] && PAGER=more

DIR=”$HOME”
# Si no hay $HOME lamentablemente tenemos que utilizar otro
# directorio… aunque aquí se podría abortar
[ -z “$DIR” ] && DIR=”/tmp/”
[ ! -d “$DIR” ] && error “No existe el directorio $DIR para almacenamiento temporal”

# Determine how to set the tempfile
if [ -n “`which tempfile`” ]; then
draetmp=`tempfile -d $DIR –prefix=.`
[ -e “$draetmp” ] || error “Tempfile no ha podido crear el fichero temporal $draetmp!”
else
draetmp=$DIR/drae.$$
if [ ! -e “$draetmp” ] ; then
>$draetmp
else
error “Alguien ha creado ya el fichero temporal $draetmp!”
fi
fi
trap “rm -rf $draetmp” 1 2 3 9 15

if [ -n “`which lynx`” ]; then
DOWNLOAD=”lynx –dump –nolist”;
elif [ -n “`which links`” ]; then
DOWNLOAD=”links -dump”;
elif [ -n “`which w3ma`” ]; then
DOWNLOAD=”w3m -dump -T text/html -s”;
else
error “No se encuentra un programa que pueda ser utilizado para acceder al diccionario”;
fi

}

# Inicio del programa

# TODO si se busca más de una iterar por ellas
[ -z “$1” ] && error “Modo de uso: $0 palabra”
setup

$DOWNLOAD “http://buscon.rae.es/draeI/SrvltGUIBusUsual?TIPO_HTML=2&LEMA=$1” > $draetmp
[ $? -ne 0 ] && error “Error al acceder a buscon.rae.es”

if [ -f “$draetmp” ]
then
cat $draetmp 2> /dev/null | tail -n $((`wc -l $draetmp 2> /dev/null | awk ‘{ print $1 ;}’`-2)) | $PAGER
echo
rm $draetmp
else
error “Error al acceder al fichero temporal $draetmp (no creado)”
fi

exit 0

He corregido el último script, ya que cometí un error al pegar, y puse la versión antigua.

Este post ha sido traido de forma automatica desde https://web.archive.org/web/20140625063149/http:/bulma.net/body.phtml?nIdNoticia=1819 por un robot nigromante, si crees que puede mejorarse, por favor, contactanos.