Foro - Perl en Español

por **fjmn2001** » 2009-08-31 17:11 @757

Hola, amigos de Perl en Español.

En esta ocasión les escribo porque no encuentro la forma de trabajar con el tipo de datos array en PostgreSQL y Perl. Bueno, le explico....

Estoy trabajando en un horario de clases; éste se guarda en un campo de una tabla como tipo de dato array...

Sintáxis: [ Descargar ] [ Ocultar ]

Using sql Syntax Highlighting

horario_app character varying[][]NOTNULL,Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Entonces, cuando intento obtener esos datos desde Perl con:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$my@valor=$self->dbh->selectrow_array("SELECT horario_app FROM ald_doc_per WHERE ced_per=\'18581222\'");Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

lo que obtengo es el array, pero no sé cómo ingresar a los datos.

¿Alguna recomendación?

Bueno espero su pronta respuesta...

Una cosa. ¿Qué hace un '$' delante de my()?

Para la función selectrow_array():

Este método combina "prepare", "execute" y "fetchrow_array" en una sola llamada. Si se llama en contexto lista, devuelve la primera fila de datos de la sentencia. El parámetro $sentencia puede ser un manejador previamente preparado, en cuyo caso el "prepare" es saltado.

por **fjmn2001** » 2009-08-31 18:19 @805

Muchas gracias por esto, siempre había buscado algo así y no sabia como...

Este es el resultado que me arroja,

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$VAR1 = [ [ [ 'on', 'on', 'on', 'off', 'off', 'off', 'on' ], [ 'off', 'off', 'off', 'off', 'off', 'off', 'off' ] ] ];
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Eso es 2 filas de 7 columnas, entonces, si yo quiero acceder al primer "on", ¿cómo tendría qué hacer? De verdad, disculpen mi ignorancia, pero soy nuevo en el campo de la programación...

por **explorer** » 2009-08-31 18:50 @826

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
 
my @valor = (
    [ 'on', 'on', 'on', 'off', 'off', 'off', 'on' ],
    [ 'off', 'off', 'off', 'off', 'off', 'off', 'off' ],
);
   
print $valor[0]->[0], "\n";
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Esto no es un tema de programación, sino de entender cómo funcionan las estructuras de datos complejas en Perl.

Más información en perldsc y perllol.

por **fjmn2001** » 2009-08-31 18:57 @831

Muchísimas gracias, me ayudó mucho ese fragmento de código, aunque a mi me funcionó de esta manera...

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$valor[0]->[0]->[0],Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Pues yo no puedo crear el array dentro del mismo código de perl porque ya está creado en la base de datos... ese código sí me da el primer on de mi arreglo bidimensional. Muchas gracias...

Foro - Perl en Español

array en PostgreSQL y Perl

array en PostgreSQL y Perl

Publicidad

Re: array en PostgreSQL y Perl

Re: array en PostgreSQL y Perl

Re: array en PostgreSQL y Perl

Re: array en PostgreSQL y Perl

¿Quién está conectado?