[Linuxcantabria] mi script, esta vez si que si

Juan Juan
Jue Nov 24 17:49:00 UTC 2005


El Thu, 24 Nov 2005 15:22:12 +0100
kyle escribió:

> On Thu, Nov 24, 2005 at 01:55:10PM +0100, Luque Rodríguez Argüelles
> wrote:
> > bueno después de mis intervenciones desastrosas ataco de nuevo:
> > 
> > sea un archivo entrada.dat con dos columnas con datos de este
> > pelaje: [....]
> > 23.9602 ,8.97086
> > 
> > 24.2971 ,8.97165
> > 
> > 24.1152 ,8.97158
> > 
> > 24.1255 ,8.97066
> > 
> > quiero, si es posible, que alguien me ayude a hacer un script que
> > sume un valor cte a todos los valores de la primera columna y que
> > añada al ppio del archivo una línea con dos valores (0,0)
> 
> cat entrada.dat |perl -e 'while (<>) { if ($_ =~ /(\d+\.\d+) ,(\d+\.\d
> +)/ ) {print $1+CONSTANTE," ",$2, "\n"} ; } ' > temporal.tmp
> 
> echo "0, 0" > temporal2.tmp
> 
> cat temporal2.tmp temporal.tmp > salida.dat
> 
se puede reducir aun más:
(echo "0, 0" ; cat entrada.dat |perl -e 'while (<>) { if ($_ =~ /(\d+\.\d+) ,(\d+\.\d+)/ ) {print $1+CONSTANTE," ,",$2, "\n"} ; } ' ) > salida.dat


-- 
Juan José Gutiérrez de Quevedo
Director Técnico (juanjo en iteisa.com)
ITEISA (http://www.iteisa.com)
942544036 - 637447953

"Planet Express: our crew is replaceable, your package isn't."
-Advertisement 



More information about the Linuxcantabria mailing list