From mtahan at me.gov.ve Fri Oct 8 09:38:01 2004 From: mtahan at me.gov.ve (=?ISO-8859-1?Q?M=F3nica?= Tahan) Date: Fri Oct 8 15:36:57 2004 Subject: [caracas-pm] POSTGRESQL (ERROR: column "tpersonal" does not exist) Message-ID: <1097246280.1540.11.camel@box> Saludos Perl Mongers, En este momento me encuentro trabajando con el lenguaje plpgsql, ya que estoy programando con perl como lenguaje de programaci?n y postgresql como manejador, el problema que se est? presentando es el siguiente: He creado una funci?n el leguaje procedural en postgres que contiene las siguientes l?neas: CREATE FUNCTION consulta(tpersonal) RETURNS text AS ' DECLARE tpersonal ALIAS for $1; BEGIN RETURN tpersonal.npersonal; END; ' LANGUAGE 'plpgsql'; Pero cuando la llamo a trav?s de un query me manda el siguiente error: ERROR: column "tpersonal" does not exist El query lo realizo de la siguiente manera: select consulta(tpersonal); La verdad no s? si es que estoy haciendo mal el query, pues esto que realiz? lo hice gui?ndome por la documentaci?n de postgres, pues la verdad estoy inici?ndome con esta parte de Postgres, ya que nunca antes lo hab?a utilizado. Conozco POstgres, mas nunca hab?a trabajado con stored procedures ni con funciones. Si alguien por favor puede ayudarme se lo agradezco de antemano, Atentamente, -- Ing. M?nica Tahan Analista de Sistemas Oficina Ministerial de Inform?tica Ministerio de Educaci?n y Deportes From aarnal at me.gov.ve Mon Oct 11 12:03:56 2004 From: aarnal at me.gov.ve (Alexis Arnal) Date: Mon Oct 11 12:05:52 2004 Subject: [caracas-pm] Dudas acerca de METADOT Message-ID: <1097514234.3869.16.camel@m1344.me.gov.ve> Saludos, estoy tratando de familiarizarme un poco con METADOT basado en PERL+MySQL recomendado por Ernesto Hernandez Novich. Mi pregunta es si puedo instalar METADOT sin necesidad de modificar el DocumentRoot del httpd.conf ya que tengo otros sistemas corriendo. Cuando creo el usuario metadot ?Es necesario descomprimir los archivos en este directorio o puedo hacerlo en la carpeta /var/www/html ????? From emhn at telcel.net.ve Mon Oct 11 14:12:18 2004 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Mon Oct 11 14:12:19 2004 Subject: [caracas-pm] Dudas acerca de METADOT In-Reply-To: <1097514234.3869.16.camel@m1344.me.gov.ve> References: <1097514234.3869.16.camel@m1344.me.gov.ve> Message-ID: On Mon, 11 Oct 2004, Alexis Arnal wrote: > Saludos, estoy tratando de familiarizarme un poco con METADOT basado en > PERL+MySQL recomendado por Ernesto Hernandez Novich. > > Mi pregunta es si puedo instalar METADOT sin necesidad de modificar el > DocumentRoot del httpd.conf ya que tengo otros sistemas corriendo. Lo puedes poner en un host virtual. > Cuando creo el usuario metadot ?Es necesario descomprimir los archivos > en este directorio o puedo hacerlo en la carpeta /var/www/html ????? En la carpeta que quieras, lo que importa es que en la definici?n del host virtual coloques los directorios correctos. Nos reunimos el s?bado, ?qu? tal si instalamos Metadot? -- Ernesto Hern?ndez-Novich - On Linux 2.6.8.1 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3 From aarnal at me.gov.ve Mon Oct 11 15:07:00 2004 From: aarnal at me.gov.ve (Alexis Arnal) Date: Mon Oct 11 15:08:59 2004 Subject: [caracas-pm] Dudas acerca de METADOT In-Reply-To: References: <1097514234.3869.16.camel@m1344.me.gov.ve> Message-ID: <1097525220.3869.18.camel@m1344.me.gov.ve> Me parece excelente idea. El lun, 11-10-2004 a las 15:12, Ernesto Hernandez-Novich escribi?: > On Mon, 11 Oct 2004, Alexis Arnal wrote: > > Saludos, estoy tratando de familiarizarme un poco con METADOT basado en > > PERL+MySQL recomendado por Ernesto Hernandez Novich. > > > > Mi pregunta es si puedo instalar METADOT sin necesidad de modificar el > > DocumentRoot del httpd.conf ya que tengo otros sistemas corriendo. > > Lo puedes poner en un host virtual. > > > Cuando creo el usuario metadot ?Es necesario descomprimir los archivos > > en este directorio o puedo hacerlo en la carpeta /var/www/html ????? > > En la carpeta que quieras, lo que importa es que en la definici?n del > host virtual coloques los directorios correctos. > > Nos reunimos el s?bado, ?qu? tal si instalamos Metadot? From holzem at cantv.net Tue Oct 12 16:04:04 2004 From: holzem at cantv.net (Hans Olzem) Date: Tue Oct 12 16:03:06 2004 Subject: [caracas-pm] Dudas acerca de METADOT In-Reply-To: References: <1097514234.3869.16.camel@m1344.me.gov.ve> Message-ID: <416C46C4.3020809@cantv.net> Me parece buena idea. Donde? Cuando? Cu Hans Ernesto Hernandez-Novich wrote: >On Mon, 11 Oct 2004, Alexis Arnal wrote: > > >>Saludos, estoy tratando de familiarizarme un poco con METADOT basado en >>PERL+MySQL recomendado por Ernesto Hernandez Novich. >> >>Mi pregunta es si puedo instalar METADOT sin necesidad de modificar el >>DocumentRoot del httpd.conf ya que tengo otros sistemas corriendo. >> >> > >Lo puedes poner en un host virtual. > > > >>Cuando creo el usuario metadot ?Es necesario descomprimir los archivos >>en este directorio o puedo hacerlo en la carpeta /var/www/html ????? >> >> > >En la carpeta que quieras, lo que importa es que en la definici?n del >host virtual coloques los directorios correctos. > >Nos reunimos el s?bado, ?qu? tal si instalamos Metadot? > > From mtahan at me.gov.ve Wed Oct 13 01:56:01 2004 From: mtahan at me.gov.ve (=?ISO-8859-1?Q?M=F3nica?= Tahan) Date: Wed Oct 13 07:55:00 2004 Subject: [caracas-pm] Re: Dudas acerca de METADOT Message-ID: <1097650561.1339.2.camel@box> Saludos Perl Monger, Si estoy muy de acuerdo con que el tema de reuni?n de ?ste s?bado sea METADOT, ahora la pregunta de siempre, en qu? parte nos reuniremos???? ser? en el ISEIT??? Atentamente, -- Ing. M?nica Tahan Analista de Sistemas Oficina Ministerial de Inform?tica Ministerio de Educaci?n y Deportes From emhn at telcel.net.ve Wed Oct 13 08:21:36 2004 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Oct 13 08:21:40 2004 Subject: [caracas-pm] Re: Dudas acerca de METADOT In-Reply-To: <1097650561.1339.2.camel@box> References: <1097650561.1339.2.camel@box> Message-ID: On Wed, 13 Oct 2004, M?nica Tahan wrote: > Si estoy muy de acuerdo con que el tema de reuni?n de ?ste s?bado sea > METADOT, ahora la pregunta de siempre, en qu? parte nos reuniremos???? > ser? en el ISEIT??? Por los momentos, ese es el sitio de reuni?n, a las 9:00am. -- Ernesto Hern?ndez-Novich - On Linux 2.6.8.1 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3 From cpineda at grupodiga.com.ve Thu Oct 14 13:13:18 2004 From: cpineda at grupodiga.com.ve (cpineda@grupodiga.com.ve) Date: Thu Oct 14 13:13:26 2004 Subject: [caracas-pm] ubicacion de la reunion Message-ID: hola ayer confirme, para hacer la reunion de perl mongers en el ISEIT Saludos Carlos Pineda From emhn at telcel.net.ve Fri Oct 15 14:17:11 2004 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Fri Oct 15 14:17:14 2004 Subject: [caracas-pm] ubicacion de la reunion In-Reply-To: References: Message-ID: On Thu, 14 Oct 2004, wrote: > hola ayer confirme, para hacer la reunion de perl mongers en el ISEIT Excelente! Pues nos vemos ma?ana s?bado 2004-10-16 0900 VET en el ISEIT -- Ernesto Hern?ndez-Novich - On Linux 2.6.8.1 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3 From holzem at cantv.net Tue Oct 19 07:57:04 2004 From: holzem at cantv.net (Hans Olzem) Date: Tue Oct 19 07:55:40 2004 Subject: [caracas-pm] abrir archivo Message-ID: <41750F20.30006@cantv.net> Hola Mongers, estoy usando lo siguiente para trabajar sobre todos los archivos en un directorio. while () { open( R, ) || die "Error opening: Trackfile"; trabaja sobre cada linea del archivo; } Cuando uno de estos archivos presenta una falla, el programa aborta con un error. Me gustaria que el programa imprimaria una lista de los archivos sobre el cual esta trabajando actualmente para saber cual archivo contiene informacion errada. Alguien tiene una idea? Cu Hans From aarnal at me.gov.ve Tue Oct 19 09:50:43 2004 From: aarnal at me.gov.ve (Alexis Arnal) Date: Tue Oct 19 09:52:41 2004 Subject: [caracas-pm] abrir archivo In-Reply-To: <41750F20.30006@cantv.net> References: <41750F20.30006@cantv.net> Message-ID: <1098197441.4008.17.camel@m1344.me.gov.ve> Saludos, lo que se me ocurre es que no le mandes el die, ya que este aborta la operaci?n. Por el contrario utiliza un condicional y para saber cual es el archivo podemos utilizar un contador. $i=0; while () { unless open( R, ){ print "Error opening: $i Trackfile $year*.T ; } ................ ................ trabaja sobre cada linea del archivo; $i++; } Creo que es un poco arcaico, espero que te sirva. Nota: Si lo que dije anteriormente no es factible por favor me lo dicen ya que _SOY un NOVATO Perl_. Atte. Ing.Alexis Arnal El mar, 19-10-2004 a las 08:57, Hans Olzem escribi?: > Hola Mongers, > > estoy usando lo siguiente para trabajar sobre todos los archivos en un > directorio. > > while () { > open( R, ) || die "Error opening: Trackfile"; > trabaja sobre cada linea del archivo; > } > > > > Cuando uno de estos archivos presenta una falla, el programa aborta con > un error. > > Me gustaria que el programa imprimaria una lista de los archivos sobre > el cual esta > trabajando actualmente para saber cual archivo contiene informacion errada. > > Alguien tiene una idea? > > Cu > > Hans > > > _______________________________________________ > caracas-pm mailing list > caracas-pm@mail.pm.org > http://www.pm.org/mailman/listinfo/caracas-pm > From emhn at telcel.net.ve Tue Oct 19 10:38:37 2004 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Tue Oct 19 10:38:43 2004 Subject: [caracas-pm] abrir archivo In-Reply-To: <41750F20.30006@cantv.net> References: <41750F20.30006@cantv.net> Message-ID: On Tue, 19 Oct 2004, Hans Olzem wrote: > Hola Mongers, > > estoy usando lo siguiente para trabajar sobre todos los archivos en un > directorio. > > while () { > open( R, ) || die "Error opening: Trackfile"; > trabaja sobre cada linea del archivo; > } > > > > Cuando uno de estos archivos presenta una falla, el programa aborta con > un error. > > Me gustaria que el programa imprimaria una lista de los archivos sobre > el cual esta trabajando actualmente para saber cual archivo contiene > informacion errada. for my $archivo () { unless (open(R,$archivo)) { print "($archivo) Ignorado pues no pudo ser abierto.\n"; next; } else { print "($archivo) Iniciando procesamiento...\n"; while () { eval { ...procesar cada l?nea en $_... ...generar errores con die... } if ($@) { ...verificar las condiciones de error espec?ficas en $@... # Usando 'last' te puedes salir del while si es "grave" # y si no, te recuperas aqu?, para procesar la siguiente l?nea. } } close R; print "($archivo) Finalizando procesamiento...\n"; } ...post-procesamiento entre un archivo y otro, si hubiera... } -- Ernesto Hern?ndez-Novich - On Linux 2.6.9 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3 From holzem at cantv.net Tue Oct 19 18:25:26 2004 From: holzem at cantv.net (Hans Olzem) Date: Tue Oct 19 18:24:07 2004 Subject: [caracas-pm] abrir archivo In-Reply-To: References: <41750F20.30006@cantv.net> Message-ID: <4175A266.2050701@cantv.net> Gracias por la solucion detaillada. Cu Hans Ernesto Hernandez-Novich wrote: >On Tue, 19 Oct 2004, Hans Olzem wrote: > > >>Hola Mongers, >> >>estoy usando lo siguiente para trabajar sobre todos los archivos en un >>directorio. >> >>while () { >> open( R, ) || die "Error opening: Trackfile"; >> trabaja sobre cada linea del archivo; >> } >> >> >> >>Cuando uno de estos archivos presenta una falla, el programa aborta con >>un error. >> >>Me gustaria que el programa imprimaria una lista de los archivos sobre >>el cual esta trabajando actualmente para saber cual archivo contiene >>informacion errada. >> >> > >for my $archivo () { > unless (open(R,$archivo)) { > print "($archivo) Ignorado pues no pudo ser abierto.\n"; > next; > } else { > print "($archivo) Iniciando procesamiento...\n"; > while () { > eval { > ...procesar cada l?nea en $_... > ...generar errores con die... > } > if ($@) { > ...verificar las condiciones de error espec?ficas en $@... > # Usando 'last' te puedes salir del while si es "grave" > # y si no, te recuperas aqu?, para procesar la siguiente l?nea. > } > } > close R; > print "($archivo) Finalizando procesamiento...\n"; > } > ...post-procesamiento entre un archivo y otro, si hubiera... >} > > From emhn at telcel.net.ve Tue Oct 26 09:13:23 2004 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Tue Oct 26 09:13:26 2004 Subject: [caracas-pm] Nuevo paquete en Debian... Message-ID: Para los que usamos Debian testing/sid, a partir de hoy podemos hacer apt-get install libdevel-ptkdb-perl ...y tenemos el debugger con interfaz gr?fico que vimos no hace mucho. -- Ernesto Hern?ndez-Novich - On Linux 2.6.9 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. GPG Key Fingerprint = 438C 49A2 A8C7 E7D7 1500 C507 96D6 A3D6 2F4C 85E3