• Publicidad

Agregar datos a archivo CSV

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Agregar datos a archivo CSV

Notapor shalo » 2011-01-27 13:15 @594

Estimados,

Se me presentó un problemilla. Lo más probable es que no sea muy difícil de resolver pero no me resulta.

La idea es ingresar al final de cada línea un dato delimitado por ," (,"fecha"). pero el texto necesito que se ingrese a través del teclado.

Utilizando el comando sed en la consola no tengo problemas de agregar

sed 's/$/,"texto"/' test.csv >test2.csv

Mi idea era la siguiente:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use strict;
  2.  
  3. print "Fecha a ingresar: ";
  4. my $fecha=<STDIN>;
  5.  
  6. system ('sed s/$/,"$fecha"/ test.csv >test2.csv');
  7.  
  8. print "La fecha ingresada es: $fecha";
  9.  
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


El problema es que dentro de la sentencia sed no me toma la variable $fecha.


Espero puedan darme una manito.

Un abrazo
shalo
Perlero nuevo
Perlero nuevo
 
Mensajes: 4
Registrado: 2011-01-25 13:10 @590

Publicidad

Re: Agregar datos a archivo CSV

Notapor explorer » 2011-01-27 15:31 @688

El problema está en el uso de las comillas simples. Con ellas están impidiendo la expansión de las variables.

Por otra parte, todo el proceso lo puedes realizar en Perl, sin necesitar el llamar al comando sed.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use strict;
  2.  
  3. print "Fecha a ingresar: ";
  4. chomp(my $fecha = <>);
  5.  
  6. open my $csv,  '<', 'test.csv';
  7. open my $csv2, '>', 'test2.csv';
  8.  
  9. while (my $linea = <$csv>) {
  10.     print $csv2 "$linea,$fecha\n";
  11. }
  12.  
  13. close $csv;
  14. close $csv2;
  15.  
  16. print "La fecha ingresada es: $fecha\n";
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14486
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado

cron