• Publicidad

Insert sqlite

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

Insert sqlite

Notapor sarriaga » 2014-05-28 11:25 @517

Hola, ¿qué tal, compañeros Perleros?

Tengo un conflicto ya que necesito realizar un insert SQLite de manera dinámica. ¿Hay manera de hacer esto? Les explico: en una propiedad tengo dos valores que contienen el nombre y el valor (los valores los obtengo de la web) y estas acciones las estoy realizando en un módulo .pm, lo que tengo es lo siguiente.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. # mis propiedades
  2. my @list = qw(letra_unit clave);
  3.  
  4. # Obtengo los nombres de las propiedades, obtengo la primera posición para ponerla en mayúsculas
  5. # el resultado debe ser : @tables = LETRA y CLAVE
  6.  
  7. foreach(@list ){
  8.     @tables = ~/^(\w+)(\_\w+) | (\w+)$/;
  9.     @tables = uc($1);
  10.   }
  11. # Creo sentencia SQL para ser ejecutada
  12.  
  13. foreach(@tables){
  14. $dbh->do('INSERT INTO TABLE_'.$_.' VALUES(NULL, $TABLE_ID, '.map {$self->$_} @list.')');
  15. }
  16.  
  17.  
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4


Así es como tengo mi estructura, pero no realiza nada, necesito ayuda.
sarriaga
Perlero nuevo
Perlero nuevo
 
Mensajes: 69
Registrado: 2013-10-21 08:42 @404

Publicidad

Re: Insert sqlite

Notapor explorer » 2014-05-28 14:44 @655

Cambia el $dbh-do() por un print(), y así saldrá la consulta en pantalla, y veremos si es correcta o no.
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: Google [Bot] y 0 invitados

cron