[bcn-pm] manipular un fitxer canviant xifres negatives per un zero

Gonzalo Pérez de Olaguer Córdoba gpoc a iies.es
dll mar 17 12:42:39 PDT 2014


-----En respuesta a-----
Fecha: Mon, 17 Mar 2014 17:23:43 +0000
Desde: "Agud Pique, Enric" <eagud.q a tv3.cat>
Para: Barcelona Perl Mongers <barcelona-pm a pm.org>
Asunto: Re: [bcn-pm] manipular un fitxer canviant xifres negatives per un zero


> entonces si el numero N es menor de zero y el numero N es zero, N toma el ultimo valor asignado que será zero y lo muestra y queda grabado, es de esta manera como lo entiendo, es correcto?

# lee una línea de entrada y la asigna a la variable N
# esto se repetirá hasta que ya no haya más líneas que leer
while read N ; do
	# verifica si N es menor que cero, y si es cierto asigna 0 a N
	[ "$N" -lt 0 ] && N=0
	# escribe N en la salida
	echo $N
# fin del bucle while
done
# lee data.dat y escribe en data2.dat
< data.dat > data2.dat

-- 
Gonzalo Pérez de Olaguer Córdoba <gpoc a iies.es> --- www.gpoc.es
PGP key 2861C704 --- F206 5671 6789 425D 111C  1302 214F 1934 2861 C704
-------------- part següent --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 190 bytes
Desc: no disponible
URL: <http://mail.pm.org/pipermail/barcelona-pm/attachments/20140317/96c942d1/attachment.bin>


Més informació sobre la llista de correu Barcelona-pm