[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: RMS España, España y España



On Tue, Jul 08, 2003 at 05:01:11PM +0200, Teófilo Ruiz Suárez wrote:
> El  8-jul-2003 a las 10:15:11, Jesús Roncero escribió:
> > -----BEGIN PGP SIGNED MESSAGE-----
> > Hash: SHA1
> > 
> > On Tuesday 08 July 2003 01:29, Teófilo Ruiz Suárez wrote:
> > > sikanda-01:27:57:~$ drae garbeo
> > >    1. m. paseo ( acción de pasearse). Dar, darse un garbeo.
> > 
> > Teo, eso es algún script que tira de rae.es? es GPL? lo compartiría usted? 
> > jeje :)
> 
> El script que yo uso lo hizo Javier Carranza (trunks) y está bastante
> currado, por que si la definición es larga te lo pasa a un more y por
> varios detallitos más.

Y qué tal este script, basado en el de Javier y con algunas cosillas más 
para funcionar en distintos sistemas ....

Saludete

Javi
#!/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 () {
	echo "ERROR: $1"
	exit 1
}

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

[ -z "$PAGER" ] && PAGER=more

# Determine how to set the tempfile
if [ -n "`which tempfile`" ]; then
	draetmp=`tempfile`
else
	draetmp=/tmp/drae.$$
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


$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 (no creado)"
fi

exit 0

Attachment: pgp2pVXpMZKOw.pgp
Description: PGP signature


Reply to: