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.
Using perl Syntax Highlighting
- # mis propiedades
- my @list = qw(letra_unit clave);
- # Obtengo los nombres de las propiedades, obtengo la primera posición para ponerla en mayúsculas
- # el resultado debe ser : @tables = LETRA y CLAVE
- foreach(@list ){
- @tables = ~/^(\w+)(\_\w+) | (\w+)$/;
- @tables = uc($1);
- }
- # Creo sentencia SQL para ser ejecutada
- foreach(@tables){
- $dbh->do('INSERT INTO TABLE_'.$_.' VALUES(NULL, $TABLE_ID, '.map {$self->$_} @list.')');
- }
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
Así es como tengo mi estructura, pero no realiza nada, necesito ayuda.
