From SALVAFG en terra.es  Thu Jul  3 01:38:39 2008
From: SALVAFG en terra.es (SALVAFG en terra.es)
Date: Thu, 3 Jul 2008 10:38:39 +0200 (MEST)
Subject: [Madrid-pm] Quedada tecnica
Message-ID: <11103205.1215074319947.JavaMail.root@cps9>

bueno que, quedamos hoy o no?

yo voto que si... aunque solo sea para hablar de quienes vamos a la 
YAPC::Europe de este a~no ;-)

- Salva



Ahora también puedes acceder a tu correo Terra desde el móvil.
Infórmate pinchando aquí.



From darkturo en gmail.com  Thu Jul  3 14:33:30 2008
From: darkturo en gmail.com (turo)
Date: Thu, 3 Jul 2008 23:33:30 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <11103205.1215074319947.JavaMail.root@cps9>
References: <11103205.1215074319947.JavaMail.root@cps9>
Message-ID: <6ae0d1e50807031433r2d76237fje1018d30244ba7dd@mail.gmail.com>

oops, debe haber problemas con la lista o algo, a mi me acaba de llegar el
correo :-S



On Thu, Jul 3, 2008 at 10:38 AM, SALVAFG at terra.es <SALVAFG at terra.es> wrote:

> bueno que, quedamos hoy o no?
>
> yo voto que si... aunque solo sea para hablar de quienes vamos a la
> YAPC::Europe de este a~no ;-)
>
> - Salva
>
>
>
> Ahora también puedes acceder a tu correo Terra desde el móvil.
> Infórmate pinchando aquí.
>
>
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080703/cfd77d83/attachment.html>

From sfandino en yahoo.com  Thu Jul  3 02:00:00 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Thu, 3 Jul 2008 02:00:00 -0700 (PDT)
Subject: [Madrid-pm] Se postpone la quedada tecnica :(
Message-ID: <455442.3013.qm@web52706.mail.re2.yahoo.com>

Que tal Diego,

Oye, no consigo enviar correos a la lista de madrid-pm, lo he intentado desde una direccion de Yahoo y desde otra de Terra y no hay manera. Puedes probar tu a ver si a ti te va?

De lo que se trataba era de saber si iba a haber reunion hoy o no... a lo que yo votaria que si!

- Salva



----- Original Message ----
> From: Diego Kuperman <diego en kuperman.com.ar>
> To: Lista de correo de Madrid Perl Mongers <madrid-pm en pm.org>
> Sent: Tuesday, June 24, 2008 3:12:16 PM
> Subject: [Madrid-pm] Se postpone la quedada tecnica :(
> 
> Hola mongers!
> 
> siento tener que cancelar la quedada de este jueves. Por la huelga de 
> transportistas aun no hemos recibido el proyector :(
> 
> De paso a los que nos va el futbol no tendremos que tomar dificiles 
> decisiones.
> 
> Como teneis las agendas para el jueves 3/6 o 10/6 ?
> 
> El programa para la quedada de momento es:
> 
>   - yo hare una intro a moose y mostrare un caso de uso
> 
> Alguien se anima a contarnos algo mas!?
> 
> Saludos,
> Diego
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm en pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm



      

From diego en kuperman.com.ar  Thu Jul  3 15:41:43 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Fri, 04 Jul 2008 00:41:43 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <6ae0d1e50807031433r2d76237fje1018d30244ba7dd@mail.gmail.com>
References: <11103205.1215074319947.JavaMail.root@cps9>
	<6ae0d1e50807031433r2d76237fje1018d30244ba7dd@mail.gmail.com>
Message-ID: <486D55A7.5080107@kuperman.com.ar>

Hola!

turo wrote:
> oops, debe haber problemas con la lista o algo, a mi me acaba de llegar 
> el correo :-S
> 
Si, los ha habido. Al parecer ya funciona :)

Hoy le comentaba a salva que aun no hemos recibido el proyector, pero 
que ya esta en madrid y deberia estar al caer... Ya me da un poco de 
verguenza prometer fechas, pero si todo va bien yo creo que el jueves 
próximo deberia ser el dia. Como os viene?

Tambien he medio-liado a salva para que nos cuente lo que tenga ganas 
(que seguro es interesante), no es cierto salva!? :p

Un abrazo!,
Diego

> 
> 
> On Thu, Jul 3, 2008 at 10:38 AM, SALVAFG at terra.es 
> <mailto:SALVAFG at terra.es> <SALVAFG at terra.es <mailto:SALVAFG at terra.es>> 
> wrote:
> 
>     bueno que, quedamos hoy o no?
> 
>     yo voto que si... aunque solo sea para hablar de quienes vamos a la
>     YAPC::Europe de este a~no ;-)
> 
>     - Salva
> 
> 
> 
>     Ahora también puedes acceder a tu correo Terra desde el móvil.
>     Infórmate pinchando aquí.
> 
> 
>     _______________________________________________
>     Madrid-pm mailing list
>     Madrid-pm at pm.org <mailto:Madrid-pm at pm.org>
>     http://mail.pm.org/mailman/listinfo/madrid-pm
> 
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm

From sfandino en yahoo.com  Wed Jul  2 23:27:24 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Wed, 2 Jul 2008 23:27:24 -0700 (PDT)
Subject: [Madrid-pm] Se postpone la quedada tecnica :(
Message-ID: <282072.53629.qm@web52707.mail.re2.yahoo.com>

bueno que, quedamos hoy o no?

yo voto que si... aunque solo sea para hablar de quienes vamos a la YAPC::Europe de este a~no ;-)

- Salva



----- Original Message ----
> From: Diego Kuperman <diego en kuperman.com.ar>
> To: Lista de correo de Madrid Perl Mongers <madrid-pm en pm.org>
> Sent: Tuesday, June 24, 2008 3:12:16 PM
> Subject: [Madrid-pm] Se postpone la quedada tecnica :(
> 
> Hola mongers!
> 
> siento tener que cancelar la quedada de este jueves. Por la huelga de 
> transportistas aun no hemos recibido el proyector :(
> 
> De paso a los que nos va el futbol no tendremos que tomar dificiles 
> decisiones.
> 
> Como teneis las agendas para el jueves 3/6 o 10/6 ?
> 
> El programa para la quedada de momento es:
> 
>   - yo hare una intro a moose y mostrare un caso de uso
> 
> Alguien se anima a contarnos algo mas!?
> 
> Saludos,
> Diego
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm en pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm



      

From diego en kuperman.com.ar  Thu Jul  3 07:11:46 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Thu, 03 Jul 2008 16:11:46 +0200
Subject: [Madrid-pm] Prueba
Message-ID: <486CDE22.2090507@kuperman.com.ar>

Esto es solo una prueba, podeis borrar si este mensaje llega a la lista 
(al parecer no esta funcionando)

From diego en kuperman.com.ar  Thu Jul  3 02:24:20 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Thu, 03 Jul 2008 11:24:20 +0200
Subject: [Madrid-pm] Se postpone la quedada tecnica :(
In-Reply-To: <6ae0d1e50806240816j5a4a1cdbuf282c686611b84e5@mail.gmail.com>
References: <4860F2B0.60403@kuperman.com.ar>
	<6ae0d1e50806240816j5a4a1cdbuf282c686611b84e5@mail.gmail.com>
Message-ID: <486C9AC4.5000803@kuperman.com.ar>

Hola!

Por fin nuestro proyector esta en madrid, aunque aun no en la ofi. Para 
no dar mas vueltas con esta quedada (que bastante confucion provoca) lo 
que voy a hacer es el dia que recibamos el proyector confirme de una vez 
y por todas la fecha. Si todo sale como parece yo espero que pueda ser 
el próximo jueves.

Un abrazo!
Diego


turo wrote:
> Yo puedo cualquiera de los dos jueves que propones :-)
> 
> En cuanto a lo de añadir algo más ... la verdad es que soy el típico que 
> se lee los manuales y luego los olvida ... la charlita sobre Catalyst, 
> no hubiese estado mal, o incluso la de svk ... una de mechanize o porqué 
> no un hacking del LWP usándolo contra algunos webservices de delicious o 
> algún otro servicio ...
> umm, quizás los suyo es que en la reunión hicieramos una charla de 
> cuales son nuestros intereses, y averiguar que podríamos sacar del perl 
> group entre todos (todo esto con la pizza famosa y las cañejas)... 
> aunque bueno, como soy el nuevo, puede que me las esté dando de listo y 
> esto ya lo hayáis hecho en otra ocasion ...
> 
> Un saludo mpmongers!,
> 
> Arturo
> 
> 
> 2008/6/24 Diego Kuperman <diego at kuperman.com.ar 
> <mailto:diego at kuperman.com.ar>>:
> 
>     Hola mongers!
> 
>     siento tener que cancelar la quedada de este jueves. Por la huelga de
>     transportistas aun no hemos recibido el proyector :(
> 
>     De paso a los que nos va el futbol no tendremos que tomar dificiles
>     decisiones.
> 
>     Como teneis las agendas para el jueves 3/6 o 10/6 ?
> 
>     El programa para la quedada de momento es:
> 
>      - yo hare una intro a moose y mostrare un caso de uso
> 
>     Alguien se anima a contarnos algo mas!?
> 
>     Saludos,
>     Diego
>     _______________________________________________
>     Madrid-pm mailing list
>     Madrid-pm at pm.org <mailto:Madrid-pm at pm.org>
>     http://mail.pm.org/mailman/listinfo/madrid-pm
> 
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm

From sfandino en yahoo.com  Fri Jul  4 00:37:37 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Fri, 4 Jul 2008 00:37:37 -0700 (PDT)
Subject: [Madrid-pm] Quedada tecnica
Message-ID: <95352.85832.qm@web52705.mail.re2.yahoo.com>

hola

> Tambien he medio-liado a salva para que nos cuente lo que tenga ganas 
> (que seguro es interesante), no es cierto salva!? :p

vaaaale...

pero como le decia a Diego, tiene que ser algo que no requiera mucha preparacion previa por mi parte porque mi tiempo libre es nulo.

Las cosas que se me ocurren son:

- un taller de XS: alguien propone una (adecuada) libreria escrita en C y hacemos un wrapper en Perl para la misma
- como hacer y distribuir un paquete en CPAN (taller tambien?)
- perl sorting
- perl profiling
- alguno de mis modulos

y por supuesto acepto otras sugerencias

- Salva

> 
> Un abrazo!,
> Diego
> 
> > 
> > 
> > On Thu, Jul 3, 2008 at 10:38 AM, SALVAFG en terra.es 
> > > 
> > wrote:
> > 
> >     bueno que, quedamos hoy o no?
> > 
> >     yo voto que si... aunque solo sea para hablar de quienes vamos a la
> >     YAPC::Europe de este a~no ;-)
> > 
> >     - Salva
> > 
> > 
> > 
> >     Ahora también puedes acceder a tu correo Terra desde el móvil.
> >     Infórmate pinchando aquí.
> > 
> > 
> >     _______________________________________________
> >     Madrid-pm mailing list
> >    Madrid-pm en pm.org 
> >    http://mail.pm.org/mailman/listinfo/madrid-pm
> > 
> > 
> > 
> > ------------------------------------------------------------------------
> > 
> > _______________________________________________
> > Madrid-pm mailing list
> > Madrid-pm en pm.org
> > http://mail.pm.org/mailman/listinfo/madrid-pm
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm en pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm



      

From diego en kuperman.com.ar  Fri Jul  4 09:44:52 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Fri, 04 Jul 2008 18:44:52 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <95352.85832.qm@web52705.mail.re2.yahoo.com>
References: <95352.85832.qm@web52705.mail.re2.yahoo.com>
Message-ID: <486E5384.70209@kuperman.com.ar>

Hola!

Salvador Fandino wrote:
> hola
> 
>> Tambien he medio-liado a salva para que nos cuente lo que tenga ganas 
>> (que seguro es interesante), no es cierto salva!? :p
> 
> vaaaale...
> 
> pero como le decia a Diego, tiene que ser algo que no requiera mucha preparacion previa por mi parte porque mi tiempo libre es nulo.
> 
> Las cosas que se me ocurren son:
> 
> - un taller de XS: alguien propone una (adecuada) libreria escrita en C y hacemos un wrapper en Perl para la misma
> - como hacer y distribuir un paquete en CPAN (taller tambien?)
> - perl sorting
> - perl profiling
> - alguno de mis modulos
> 
> y por supuesto acepto otras sugerencias
> 
La verdad es que me apetecen muchas (o todas) de las opciones. He mirado 
tus modulos y me ha llamado mucho la atencion Sort::Key. Ahi hay XS, 
perl sorting, profiling y algunos de tus modulos: 3 por el precio de 1 :p

Pero en realidad yo estare contento con la opcion que tu prefieras la 
verdad :)

Saludos,
Diego

> - Salva
> 
>> Un abrazo!,
>> Diego
>>
>>>
>>> On Thu, Jul 3, 2008 at 10:38 AM, SALVAFG at terra.es 
>>> wrote:
>>>
>>>     bueno que, quedamos hoy o no?
>>>
>>>     yo voto que si... aunque solo sea para hablar de quienes vamos a la
>>>     YAPC::Europe de este a~no ;-)
>>>
>>>     - Salva
>>>
>>>
>>>
>>>     Ahora también puedes acceder a tu correo Terra desde el móvil.
>>>     Infórmate pinchando aquí.
>>>
>>>
>>>     _______________________________________________
>>>     Madrid-pm mailing list
>>>    Madrid-pm at pm.org 
>>>    http://mail.pm.org/mailman/listinfo/madrid-pm
>>>
>>>
>>>
>>> ------------------------------------------------------------------------
>>>
>>> _______________________________________________
>>> Madrid-pm mailing list
>>> Madrid-pm at pm.org
>>> http://mail.pm.org/mailman/listinfo/madrid-pm
>> _______________________________________________
>> Madrid-pm mailing list
>> Madrid-pm at pm.org
>> http://mail.pm.org/mailman/listinfo/madrid-pm
> 
> 
> 
>       
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm

From explorer en joaquinferrero.com  Sun Jul  6 14:35:00 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Sun, 06 Jul 2008 23:35:00 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <486E5384.70209@kuperman.com.ar>
References: <95352.85832.qm@web52705.mail.re2.yahoo.com>
	<486E5384.70209@kuperman.com.ar>
Message-ID: <1215380100.15510.6.camel@portatil.aprosi.net>

El vie, 04-07-2008 a las 18:44 +0200, Diego Kuperman escribió:
> > - un taller de XS: alguien propone una (adecuada) libreria escrita en C y hacemos un wrapper en Perl para la misma
> > - como hacer y distribuir un paquete en CPAN (taller tambien?)
> > - perl sorting
> > - perl profiling
> > - alguno de mis modulos
> > 
> > y por supuesto acepto otras sugerencias
> > 
> La verdad es que me apetecen muchas (o todas) de las opciones. He mirado 
> tus modulos y me ha llamado mucho la atencion Sort::Key. Ahi hay XS, 
> perl sorting, profiling y algunos de tus modulos: 3 por el precio de 1 :p
> 

Maldita sea... ¡y yo en provincias!

Algún día me podría acercar, pero siempre que se sepa la fecha con
suficiente antelación.

¿Cuándo es la próxima?

-- 
JF^D


From brunorc en gmail.com  Tue Jul  8 00:18:18 2008
From: brunorc en gmail.com (Bruno)
Date: Tue, 8 Jul 2008 09:18:18 +0200
Subject: [Madrid-pm] Depuracion
Message-ID: <982340880807080018w12b20e6dy15df59eacfd1d131@mail.gmail.com>

Hola Perl Frikis^WMongers!

Ahora podemos disfrutar la gu'ia de depuracion en castellano:

http://hugo.vulcano.cl/development/perl/guia

Que aproveche!

From preiddy en gmail.com  Wed Jul  9 03:36:26 2008
From: preiddy en gmail.com (PEGG)
Date: Wed, 9 Jul 2008 12:36:26 +0200
Subject: [Madrid-pm] Crear listados desde una BD
Message-ID: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>

Hola, tengo una tabla en una BD de mysql que almacena el nombre de un país y
su correspondiente id.
Por ejemplo:
ID - País
1 - ESP
1 - USA
1 - ITA
2 - JPN
2 - RUS
3 - VEN

Mi problema es que tengo que consultar la tabla y juntar las direcciones,
quedando así:
ESP - USA
ESP - ITA
USA - ITA
JPN - RUS

VEN no aparecería porque está sola.

La consulta sql: "SELECT id, pais from direcciones".
He probado así:
while ( @direcciones = $sth->fetchrow_array() ) {
foreach $direccion (@direcciones) {

        foreach $agrupa (@direcciones) {
            if ( $direccion eq $agrupa ) { }
            else {
                print "\U$direccion;$agrupa\n";
           }
        }
    }
Pero no lo muestra como quiero, ya no se que hacer.
Agradezco vuestros comentarios.
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/3fc2a21e/attachment.html>

From sfandino en yahoo.com  Wed Jul  9 03:51:21 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Wed, 9 Jul 2008 03:51:21 -0700 (PDT)
Subject: [Madrid-pm] Crear listados desde una BD
Message-ID: <905953.94333.qm@web52701.mail.re2.yahoo.com>

Esta consulta obtiene los pares en SQLite:


sqlite> select a.nombre, b.nombre from paises as a, paises as b where a.id == b.id and a.nombre < b.nombre;
ESP|USA
ESP|ITA
ITA|USA
JPN|RUS

sqlite> select * from paises;
1|ESP
1|USA
1|ITA
2|JPN
2|RUS
3|VEN

puede que para mysql tengas que cambiar alguna cosa, pero la idea deberia de servirte

- Salva



----- Original Message ----
From: PEGG <preiddy en gmail.com>
To: Lista de correo de Madrid Perl Mongers <madrid-pm en pm.org>
Sent: Wednesday, July 9, 2008 12:36:26 PM
Subject: [Madrid-pm] Crear listados desde una BD

Hola, tengo una tabla en una BD de mysql que almacena el nombre de un país y su correspondiente id.
Por ejemplo:
ID - País
1 - ESP
1 - USA
1 - ITA
2 - JPN
2 - RUS
3 - VEN

Mi problema es que tengo que consultar la tabla y juntar las direcciones, quedando así:
ESP - USA
ESP - ITA
USA - ITA
JPN - RUS 

VEN no aparecería porque está sola.

La consulta sql: "SELECT id, pais from direcciones".
He probado así:
while ( @direcciones = $sth->fetchrow_array() ) {
foreach $direccion (@direcciones) {
        
        foreach $agrupa (@direcciones) {
            if ( $direccion eq $agrupa ) { }
            else {
                print "\U$direccion;$agrupa\n";
           }
        }
    }
Pero no lo muestra como quiero, ya no se que hacer. 
Agradezco vuestros comentarios.



      
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/05d15593/attachment.html>

From roberto en freekeylabs.com  Wed Jul  9 03:53:59 2008
From: roberto en freekeylabs.com (Roberto Henriquez Laurent)
Date: Wed, 09 Jul 2008 12:53:59 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
Message-ID: <487498C7.1060808@freekeylabs.com>

PEGG wrote:
> Hola, tengo una tabla en una BD de mysql que almacena el nombre de un 
> país y su correspondiente id.
> Por ejemplo:
> ID - País
> 1 - ESP
> 1 - USA
> 1 - ITA
> 2 - JPN
> 2 - RUS
> 3 - VEN

Si los IDs no son únicos, creo que no deberías llamar a ese campo ID 
sino otra cosa que refleje mejor lo que es, para evitar confusiones 
(como la que experimento ahora mismo). Podría ser más bien algo como 
"grupo".

> 
> Mi problema es que tengo que consultar la tabla y juntar las 
> direcciones, quedando así:
> ESP - USA
> ESP - ITA
> USA - ITA
> JPN - RUS

Puedes probar a hacer un join de la tabla consigo misma, así:

select pa.pais paisA, pb.pais paisB from paises pa, paises pb where 
pa.grupo = pb.grupo and pa.pais <> pb.pais;

Pero tendrías el problema de que cada combinacion de dos países te 
aparece dos veces. Pero lo puedes arreglar si obligas a que la 
combinación cumpla una condición adicional, por ejemplo que paisA > 
paisB. Así solo uno de los dos pares es elegido.

Así que al final te queda:

select pa.pais paisA, pb.pais paisB from paises pa, paises pb where 
pa.grupo = pb.grupo and pa.pais > pb.pais;

Espero que te sirva, saludos!

--R


From explorer en joaquinferrero.com  Wed Jul  9 04:49:32 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Wed, 09 Jul 2008 13:49:32 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
Message-ID: <1215604172.4147.6.camel@joaquin.dcyl.off>

El mié, 09-07-2008 a las 12:36 +0200, PEGG escribió:
> Hola, tengo una tabla en una BD de mysql que almacena el nombre de un
> país y su correspondiente id.
> Por ejemplo:
> ID - País
> 1 - ESP
> 1 - USA
> 1 - ITA
> 2 - JPN
> 2 - RUS
> 3 - VEN
> 
> Mi problema es que tengo que consultar la tabla y juntar las
> direcciones, quedando así:
> ESP - USA
> ESP - ITA
> USA - ITA
> JPN - RUS 
> 
> VEN no aparecería porque está sola.
> 
> La consulta sql: "SELECT id, pais from direcciones".
> He probado así:
> while ( @direcciones = $sth->fetchrow_array() ) {
> foreach $direccion (@direcciones) {
>         
>         foreach $agrupa (@direcciones) {
>             if ( $direccion eq $agrupa ) { }
>             else {
>                 print "\U$direccion;$agrupa\n";
>            }
>         }
>     }
> Pero no lo muestra como quiero, ya no se que hacer. 
> Agradezco vuestros comentarios.

Hay que aplicar algo de combinatoria...

#!/usr/bin/perl

my @resultados = (
    [ 1 => ESP ],
    [ 1 => USA ],
    [ 1 => ITA ],
    [ 2 => JPN ],
    [ 2 => RUS ],
    [ 3 => VEN ],
);

# Leemos y hacemos la estadística
my %resultados;
foreach my $resultado ( @resultados ) {
    my ($ID, $pais) = @{$resultado}[0,1];

    push @{$resultados{ $ID }}, $pais;
}

# Sacamos las combinaciones
foreach my $clave ( keys %resultados ) {

    my $numero_elementos = @{$resultados{$clave}};
    my $ultimo = $numero_elementos-1;

    if ( $numero_elementos > 1 ) {
        for my $x ( 0 .. $ultimo-1 ) {
            for my $y ( $x+1 .. $ultimo ) {
                print "$resultados{$clave}->[$x] - $resultados{$clave}->[$y]\n";
            }
        }
    }
}

__END__

-- 
JF^D



From sfandino en yahoo.com  Wed Jul  9 05:44:24 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Wed, 9 Jul 2008 05:44:24 -0700 (PDT)
Subject: [Madrid-pm] quedamos ma~nana o no?
Message-ID: <681051.73585.qm@web52701.mail.re2.yahoo.com>

Hola,

Al final quedamos ma~nana?

Ha llegado por fin el proyector, Diego?

- Salva


      

From diego en kuperman.com.ar  Wed Jul  9 06:32:07 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Wed, 09 Jul 2008 15:32:07 +0200
Subject: [Madrid-pm] quedamos ma~nana o no?
In-Reply-To: <681051.73585.qm@web52701.mail.re2.yahoo.com>
References: <681051.73585.qm@web52701.mail.re2.yahoo.com>
Message-ID: <4874BDD7.7070207@kuperman.com.ar>

Hola !!!

Salvador Fandino wrote:
> Hola,
> 
> Al final quedamos ma~nana?
> 
> Ha llegado por fin el proyector, Diego?
> 
No!, en un rato os confirmo. Pero si os parece bien yo propongo lo 
siguiente: quedamos el próximo jueves con o sin proyector!

Que ya me da vergüenza :(

Os doy un par de horas para ver si a todos os parece bien y si es asi ya 
mando un mail en un nuevo hilo con los datos de la quedada.

Saludos,
Diego


From preiddy en gmail.com  Wed Jul  9 06:46:07 2008
From: preiddy en gmail.com (PEGG)
Date: Wed, 9 Jul 2008 15:46:07 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1215604172.4147.6.camel@joaquin.dcyl.off>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
Message-ID: <1ab0da440807090646ye19f630sd8b14f7f5c7fde39@mail.gmail.com>

Gracias a todos por sus respuestas.
Me viene mejor la opción del sql. Ya que así cualquier usuario puede
efectuar la consulta desde su ordenador. De nuevo gracias!!
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/866842d4/attachment-0001.html>

From roberto en freekeylabs.com  Wed Jul  9 06:48:15 2008
From: roberto en freekeylabs.com (Roberto Henriquez Laurent)
Date: Wed, 09 Jul 2008 15:48:15 +0200
Subject: [Madrid-pm] quedamos ma~nana o no?
In-Reply-To: <4874BDD7.7070207@kuperman.com.ar>
References: <681051.73585.qm@web52701.mail.re2.yahoo.com>
	<4874BDD7.7070207@kuperman.com.ar>
Message-ID: <4874C19F.6060205@freekeylabs.com>

Diego Kuperman wrote:
> Hola !!!
> 
> Salvador Fandino wrote:
>> Hola,
>>
>> Al final quedamos ma~nana?
>>
>> Ha llegado por fin el proyector, Diego?
>>
> No!, en un rato os confirmo. Pero si os parece bien yo propongo lo 
> siguiente: quedamos el próximo jueves con o sin proyector!

Entiendo que "proximo jueves" == "jueves 10 de julio", o sea mañana. 
Correcto?

Por mí no habría problema.

--R

From diego en kuperman.com.ar  Wed Jul  9 06:56:23 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Wed, 09 Jul 2008 15:56:23 +0200
Subject: [Madrid-pm] quedamos ma~nana o no?
In-Reply-To: <4874C19F.6060205@freekeylabs.com>
References: <681051.73585.qm@web52701.mail.re2.yahoo.com>	<4874BDD7.7070207@kuperman.com.ar>
	<4874C19F.6060205@freekeylabs.com>
Message-ID: <4874C387.30400@kuperman.com.ar>



Roberto Henriquez Laurent wrote:
> Diego Kuperman wrote:
>> Hola !!!
>>
>> Salvador Fandino wrote:
>>> Hola,
>>>
>>> Al final quedamos ma~nana?
>>>
>>> Ha llegado por fin el proyector, Diego?
>>>
>> No!, en un rato os confirmo. Pero si os parece bien yo propongo lo 
>> siguiente: quedamos el próximo jueves con o sin proyector!
> 
> Entiendo que "proximo jueves" == "jueves 10 de julio", o sea mañana. 
> Correcto?
> 
No!, próximo me refiero al 17 de julio. A ver si deity se apiada y nos 
llega el proyector.

Relanzo la "pregunta" todos pueden el Jueves 17 de Julio a las 19:30hs 
por el centro de Madrid (zona chueca / banco de españa) ?

-dk

From pancho en pancho.name  Wed Jul  9 07:34:55 2008
From: pancho en pancho.name (Pancho Horrillo)
Date: Wed, 9 Jul 2008 16:34:55 +0200
Subject: [Madrid-pm] quedamos ma~nana o no?
In-Reply-To: <4874C387.30400@kuperman.com.ar>
References: <681051.73585.qm@web52701.mail.re2.yahoo.com>
	<4874BDD7.7070207@kuperman.com.ar>
	<4874C19F.6060205@freekeylabs.com> <4874C387.30400@kuperman.com.ar>
Message-ID: <20080709143455.GA12514@pancho.name>

On Wed, Jul 09, 2008 at 03:56:23PM +0200, Diego Kuperman wrote:
>
>
> Roberto Henriquez Laurent wrote:
>> Diego Kuperman wrote:
>>> Hola !!!
>>>
>>> Salvador Fandino wrote:
>>>> Hola,
>>>>
>>>> Al final quedamos ma~nana?
>>>>
>>>> Ha llegado por fin el proyector, Diego?
>>>>
>>> No!, en un rato os confirmo. Pero si os parece bien yo propongo lo  
>>> siguiente: quedamos el próximo jueves con o sin proyector!
>>
>> Entiendo que "proximo jueves" == "jueves 10 de julio", o sea mañana.  
>> Correcto?
>>
> No!, próximo me refiero al 17 de julio. A ver si deity se apiada y nos  
> llega el proyector.
>
> Relanzo la "pregunta" todos pueden el Jueves 17 de Julio a las 19:30hs  
> por el centro de Madrid (zona chueca / banco de españa) ?
>
Hola.

Yo puedo mañana.  Las próximas dos semanas estoy inhábil para quedar.

Ya nos veremos el año menos pensado.

Ciao,

pancho.

> -dk
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm

-- 
pancho horrillo

To be conscious that
you are ignorant is a great step
to knowledge.

		Benjamin Disraeli
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: Digital signature
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/0d7251b4/attachment.bin>

From sfandino en yahoo.com  Wed Jul  9 08:02:12 2008
From: sfandino en yahoo.com (Salvador Fandino)
Date: Wed, 9 Jul 2008 08:02:12 -0700 (PDT)
Subject: [Madrid-pm] quedamos ma~nana o no?
Message-ID: <304403.30445.qm@web52712.mail.re2.yahoo.com>

hola,

Yo la verdad es que tambien preferia ma~nana.  La semana que viene no es seguro que pueda.

- Salva




----- Original Message ----
> From: Pancho Horrillo <pancho en pancho.name>
> To: Lista de correo de Madrid Perl Mongers <madrid-pm en pm.org>
> Sent: Wednesday, July 9, 2008 4:34:55 PM
> Subject: Re: [Madrid-pm] quedamos ma~nana o no?
> 
> On Wed, Jul 09, 2008 at 03:56:23PM +0200, Diego Kuperman wrote:
> >
> >
> > Roberto Henriquez Laurent wrote:
> >> Diego Kuperman wrote:
> >>> Hola !!!
> >>>
> >>> Salvador Fandino wrote:
> >>>> Hola,
> >>>>
> >>>> Al final quedamos ma~nana?
> >>>>
> >>>> Ha llegado por fin el proyector, Diego?
> >>>>
> >>> No!, en un rato os confirmo. Pero si os parece bien yo propongo lo  
> >>> siguiente: quedamos el próximo jueves con o sin proyector!
> >>
> >> Entiendo que "proximo jueves" == "jueves 10 de julio", o sea mañana.  
> >> Correcto?
> >>
> > No!, próximo me refiero al 17 de julio. A ver si deity se apiada y nos  
> > llega el proyector.
> >
> > Relanzo la "pregunta" todos pueden el Jueves 17 de Julio a las 19:30hs  
> > por el centro de Madrid (zona chueca / banco de españa) ?
> >
> Hola.
> 
> Yo puedo mañana.  Las próximas dos semanas estoy inhábil para quedar.
> 
> Ya nos veremos el año menos pensado.
> 
> Ciao,
> 
> pancho.
> 
> > -dk
> > _______________________________________________
> > Madrid-pm mailing list
> > Madrid-pm en pm.org
> > http://mail.pm.org/mailman/listinfo/madrid-pm
> 
> -- 
> pancho horrillo
> 
> To be conscious that
> you are ignorant is a great step
> to knowledge.
> 
>         Benjamin Disraeli



      

From diego en kuperman.com.ar  Wed Jul  9 08:18:11 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Wed, 09 Jul 2008 17:18:11 +0200
Subject: [Madrid-pm] quedamos ma~nana o no?
In-Reply-To: <304403.30445.qm@web52712.mail.re2.yahoo.com>
References: <304403.30445.qm@web52712.mail.re2.yahoo.com>
Message-ID: <4874D6B3.6090301@kuperman.com.ar>

Hola!

pues... ante la evidencia: quedada tecnica el Jueves 10 !!!! :P

Ahora pongo el mail con la data.

-dk


Salvador Fandino wrote:
> hola,
> 
> Yo la verdad es que tambien preferia ma~nana.  La semana que viene no es seguro que pueda.
> 
> - Salva
> 
> 
> 
> 
> ----- Original Message ----
>> From: Pancho Horrillo <pancho at pancho.name>
>> To: Lista de correo de Madrid Perl Mongers <madrid-pm at pm.org>
>> Sent: Wednesday, July 9, 2008 4:34:55 PM
>> Subject: Re: [Madrid-pm] quedamos ma~nana o no?
>>
>> On Wed, Jul 09, 2008 at 03:56:23PM +0200, Diego Kuperman wrote:
>>>
>>> Roberto Henriquez Laurent wrote:
>>>> Diego Kuperman wrote:
>>>>> Hola !!!
>>>>>
>>>>> Salvador Fandino wrote:
>>>>>> Hola,
>>>>>>
>>>>>> Al final quedamos ma~nana?
>>>>>>
>>>>>> Ha llegado por fin el proyector, Diego?
>>>>>>
>>>>> No!, en un rato os confirmo. Pero si os parece bien yo propongo lo  
>>>>> siguiente: quedamos el próximo jueves con o sin proyector!
>>>> Entiendo que "proximo jueves" == "jueves 10 de julio", o sea mañana.  
>>>> Correcto?
>>>>
>>> No!, próximo me refiero al 17 de julio. A ver si deity se apiada y nos  
>>> llega el proyector.
>>>
>>> Relanzo la "pregunta" todos pueden el Jueves 17 de Julio a las 19:30hs  
>>> por el centro de Madrid (zona chueca / banco de españa) ?
>>>
>> Hola.
>>
>> Yo puedo mañana.  Las próximas dos semanas estoy inhábil para quedar.
>>
>> Ya nos veremos el año menos pensado.
>>
>> Ciao,
>>
>> pancho.
>>
>>> -dk
>>> _______________________________________________
>>> Madrid-pm mailing list
>>> Madrid-pm at pm.org
>>> http://mail.pm.org/mailman/listinfo/madrid-pm
>> -- 
>> pancho horrillo
>>
>> To be conscious that
>> you are ignorant is a great step
>> to knowledge.
>>
>>         Benjamin Disraeli
> 
> 
> 
>       
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm

From diego en kuperman.com.ar  Wed Jul  9 08:43:27 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Wed, 09 Jul 2008 17:43:27 +0200
Subject: [Madrid-pm] =?iso-8859-1?q?Quedada_t=E9cnica_ma=F1ana_!!!?=
Message-ID: <4874DC9F.4020606@kuperman.com.ar>

Hola!

Nos vemos mañana, Jueves 10 de Julio, a las 19:30hs en Barquillo 11. La 
ofi es en ese edificio, pero a esa hora la puerta de abajo estará 
cerrada. Nos encontramos ahí, quien llegue tarde que me llame 
(610090469) al llegar.

He creado la quedada de mañana en una web que estamos desarrollando:

http://madrid.kedin.es/event/5684/quedada-tecnica-de-los-perl-mongers-de-madrid

Obviamente powered by perl :)

Tenemos 8 sillas, si podeis comentar quienes vienen y somos mas puedo 
hacer un esfuerzo para conseguir alguna mas.

Saludos y hasta mañana !
Diego



From darkturo en gmail.com  Wed Jul  9 09:40:36 2008
From: darkturo en gmail.com (turo)
Date: Wed, 9 Jul 2008 18:40:36 +0200
Subject: [Madrid-pm] =?iso-8859-1?q?Quedada_t=E9cnica_ma=F1ana_!!!?=
In-Reply-To: <4874DC9F.4020606@kuperman.com.ar>
References: <4874DC9F.4020606@kuperman.com.ar>
Message-ID: <6ae0d1e50807090940t25ef6b4dk9d884d790ae5fa00@mail.gmail.com>

$_++;

On Wed, Jul 9, 2008 at 5:43 PM, Diego Kuperman <diego at kuperman.com.ar>
wrote:

> Hola!
>
> Nos vemos mañana, Jueves 10 de Julio, a las 19:30hs en Barquillo 11. La ofi
> es en ese edificio, pero a esa hora la puerta de abajo estará cerrada. Nos
> encontramos ahí, quien llegue tarde que me llame (610090469) al llegar.
>
> He creado la quedada de mañana en una web que estamos desarrollando:
>
>
> http://madrid.kedin.es/event/5684/quedada-tecnica-de-los-perl-mongers-de-madrid
>
> Obviamente powered by perl :)
>
> Tenemos 8 sillas, si podeis comentar quienes vienen y somos mas puedo hacer
> un esfuerzo para conseguir alguna mas.
>
> Saludos y hasta mañana !
> Diego
>
>
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm at pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/28b8b45a/attachment.html>

From explorer en joaquinferrero.com  Wed Jul  9 09:52:47 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Wed, 09 Jul 2008 18:52:47 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <20080709161427.GA15903@pancho.name>
References: <95352.85832.qm@web52705.mail.re2.yahoo.com>
	<486E5384.70209@kuperman.com.ar>
	<1215380100.15510.6.camel@portatil.aprosi.net>
	<20080709161427.GA15903@pancho.name>
Message-ID: <1215622367.28879.11.camel@joaquin.dcyl.off>

El mié, 09-07-2008 a las 18:14 +0200, Pancho Horrillo escribió:
> On Sun, Jul 06, 2008 at 11:35:00PM +0200, Joaquin Ferrero wrote:
> [...]
> > Maldita sea... ¡y yo en provincias!
> > 
> > Algún día me podría acercar, pero siempre que se sepa la fecha con
> > suficiente antelación.
> > 
> Maese Joaquín!
> 
> Si te animaras a venir sería estupendo.  Una quedada perlera sin vos,
> pues no es lo mismo.
> 

Lo malo es que tendría que coger el tren de las 7 menos diez de la
mañana del día siguiente, así que me tendría que quedar a dormir en
alguna esquina de la oficina de Diego :-)

-- 
JF^D



From diego en kuperman.com.ar  Wed Jul  9 10:22:39 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Wed, 09 Jul 2008 19:22:39 +0200
Subject: [Madrid-pm] Quedada tecnica
In-Reply-To: <1215622367.28879.11.camel@joaquin.dcyl.off>
References: <95352.85832.qm@web52705.mail.re2.yahoo.com>	<486E5384.70209@kuperman.com.ar>	<1215380100.15510.6.camel@portatil.aprosi.net>	<20080709161427.GA15903@pancho.name>
	<1215622367.28879.11.camel@joaquin.dcyl.off>
Message-ID: <4874F3DF.8030102@kuperman.com.ar>

Hola!

Joaquin Ferrero wrote:
> El mié, 09-07-2008 a las 18:14 +0200, Pancho Horrillo escribió:
>> On Sun, Jul 06, 2008 at 11:35:00PM +0200, Joaquin Ferrero wrote:
>> [...]
>>> Maldita sea... ¡y yo en provincias!
>>>
>>> Algún día me podría acercar, pero siempre que se sepa la fecha con
>>> suficiente antelación.
>>>
>> Maese Joaquín!
>>
>> Si te animaras a venir sería estupendo.  Una quedada perlera sin vos,
>> pues no es lo mismo.
>>
> 
> Lo malo es que tendría que coger el tren de las 7 menos diez de la
> mañana del día siguiente, así que me tendría que quedar a dormir en
> alguna esquina de la oficina de Diego :-)
> 
Hombre, creo que vas a estar mas comodo en una cama en mi casa que en un 
rincon en la ofi :p

Si quieres pasarte por la reu dimelo y lo arreglamos ;)

Saludos,
Diego


From preiddy en gmail.com  Wed Jul  9 13:28:00 2008
From: preiddy en gmail.com (PEGG)
Date: Wed, 9 Jul 2008 22:28:00 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1215604172.4147.6.camel@joaquin.dcyl.off>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
Message-ID: <1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>

Hola de nuevo, jajajja.
Ahora cuando llegue a casa me puse con la solución que propones, pero cuando
lo ejecuto solo imprime el guión. No imprime nada más, ¿que sera?

El día 9 de julio de 2008 13:49, Joaquin Ferrero <
explorer en joaquinferrero.com> escribió:

> El mié, 09-07-2008 a las 12:36 +0200, PEGG escribió:
> > Hola, tengo una tabla en una BD de mysql que almacena el nombre de un
> > país y su correspondiente id.
> > Por ejemplo:
> > ID - País
> > 1 - ESP
> > 1 - USA
> > 1 - ITA
> > 2 - JPN
> > 2 - RUS
> > 3 - VEN
> >
> > Mi problema es que tengo que consultar la tabla y juntar las
> > direcciones, quedando así:
> > ESP - USA
> > ESP - ITA
> > USA - ITA
> > JPN - RUS
> >
> > VEN no aparecería porque está sola.
> >
> > La consulta sql: "SELECT id, pais from direcciones".
> > He probado así:
> > while ( @direcciones = $sth->fetchrow_array() ) {
> > foreach $direccion (@direcciones) {
> >
> >         foreach $agrupa (@direcciones) {
> >             if ( $direccion eq $agrupa ) { }
> >             else {
> >                 print "\U$direccion;$agrupa\n";
> >            }
> >         }
> >     }
> > Pero no lo muestra como quiero, ya no se que hacer.
> > Agradezco vuestros comentarios.
>
> Hay que aplicar algo de combinatoria...
>
> #!/usr/bin/perl
>
> my @resultados = (
>    [ 1 => ESP ],
>     [ 1 => USA ],
>    [ 1 => ITA ],
>    [ 2 => JPN ],
>    [ 2 => RUS ],
>     [ 3 => VEN ],
> );
>
> # Leemos y hacemos la estadística
> my %resultados;
> foreach my $resultado ( @resultados ) {
>    my ($ID, $pais) = @{$resultado}[0,1];
>
>    push @{$resultados{ $ID }}, $pais;
> }
>
> # Sacamos las combinaciones
> foreach my $clave ( keys %resultados ) {
>
>    my $numero_elementos = @{$resultados{$clave}};
>    my $ultimo = $numero_elementos-1;
>
>    if ( $numero_elementos > 1 ) {
>        for my $x ( 0 .. $ultimo-1 ) {
>            for my $y ( $x+1 .. $ultimo ) {
>                print "$resultados{$clave}->[$x] -
> $resultados{$clave}->[$y]\n";
>            }
>        }
>    }
> }
>
> __END__
>
> --
> JF^D
>
>
> _______________________________________________
> Madrid-pm mailing list
> Madrid-pm en pm.org
> http://mail.pm.org/mailman/listinfo/madrid-pm
>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080709/f621c391/attachment.html>

From explorer en joaquinferrero.com  Wed Jul  9 17:27:15 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Thu, 10 Jul 2008 02:27:15 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
	<1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
Message-ID: <1215649635.6386.1.camel@casa.aprosi.net>

El mié, 09-07-2008 a las 22:28 +0200, PEGG escribió:
> Hola de nuevo, jajajja.
> Ahora cuando llegue a casa me puse con la solución que propones, pero
> cuando lo ejecuto solo imprime el guión. No imprime nada más, ¿que
> sera?
> 

Quizás tengas un Perl muy antiguo. ¿Qué versión es?
(Haz un perl -v para verlo)

-- 
JF^D


From explorer en joaquinferrero.com  Wed Jul  9 17:32:50 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Thu, 10 Jul 2008 02:32:50 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
	<1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
Message-ID: <1215649970.6386.6.camel@casa.aprosi.net>

El mié, 09-07-2008 a las 22:28 +0200, PEGG escribió:
> Hola de nuevo, jajajja.
> Ahora cuando llegue a casa me puse con la solución que propones, pero
> cuando lo ejecuto solo imprime el guión. No imprime nada más, ¿que
> sera?
> 

Ah, sí... ya lo veo... 

Aunque sí funciona en Perl modernos, lo mejor es entrecomillar aquello
que sabemos que son strings, y no simples 'barewords'. Así que el cambio
que hay que hacer es:

my @resultados = (
           [ 1 => 'ESP' ],
           [ 1 => 'USA' ],
           [ 1 => 'ITA' ],
           [ 2 => 'JPN' ],
           [ 2 => 'RUS' ],
           [ 3 => 'VEN' ],
        );

Esto no hubiera pasado si hubiera puesto el 'use warnings;' al
principio... con lo útil que es, y no lo usé...

-- 
JF^D


From preiddy en gmail.com  Thu Jul 10 00:38:56 2008
From: preiddy en gmail.com (PEGG)
Date: Thu, 10 Jul 2008 09:38:56 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1215649970.6386.6.camel@casa.aprosi.net>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
	<1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
	<1215649970.6386.6.camel@casa.aprosi.net>
Message-ID: <1ab0da440807100038t5a42b9ds17ef0f85b8b1ccd7@mail.gmail.com>

Maquina 1: This is perl, v5.8.6 built for darwin-thread-multi-2level
Maquina 2: This is perl, v5.8.8 built for i486-linux-gnu-thread-multi

Ya me perdí, otra vez, jajajaja.
Tengo esto:
my %resultados;
while ( my @resultados = $sth->fetchrow_array ) {
    foreach my $resultado (@resultados) {
        my ( $ID, $pais ) = @{$resultado}[ 0, 1 ];
        push @{ $resultados{$ID} }, $pais;

Donde tengo que entrecomillar??
while ( my @resultados = $sth->fetchrow_array ) {
$resultado=\"$resultado\"; #<-Aquí??
    foreach my $resultado (@resultados) {

Imprime: Use of uninitialized value in concatenation (.) or string at ...
Ya le añadí el warnings.
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080710/a91ac20c/attachment.html>

From preiddy en gmail.com  Thu Jul 10 00:43:00 2008
From: preiddy en gmail.com (PEGG)
Date: Thu, 10 Jul 2008 09:43:00 +0200
Subject: [Madrid-pm] =?iso-8859-1?q?Quedada_t=E9cnica_ma=F1ana_!!!?=
In-Reply-To: <6ae0d1e50807090940t25ef6b4dk9d884d790ae5fa00@mail.gmail.com>
References: <4874DC9F.4020606@kuperman.com.ar>
	<6ae0d1e50807090940t25ef6b4dk9d884d790ae5fa00@mail.gmail.com>
Message-ID: <1ab0da440807100043s67850f24x3817a2188f5388c8@mail.gmail.com>

Yo voy!!! y no al Rock en Rio, jajajajaja
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080710/a0071789/attachment.html>

From explorer en joaquinferrero.com  Thu Jul 10 01:33:33 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Thu, 10 Jul 2008 10:33:33 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807100038t5a42b9ds17ef0f85b8b1ccd7@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215604172.4147.6.camel@joaquin.dcyl.off>
	<1ab0da440807091328u76e03440q3d6e1b7a72f80f4e@mail.gmail.com>
	<1215649970.6386.6.camel@casa.aprosi.net>
	<1ab0da440807100038t5a42b9ds17ef0f85b8b1ccd7@mail.gmail.com>
Message-ID: <1215678813.5475.2.camel@joaquin.dcyl.off>

El jue, 10-07-2008 a las 09:38 +0200, PEGG escribió:
> Tengo esto:
> my %resultados;
> while ( my @resultados = $sth->fetchrow_array ) {
>     foreach my $resultado (@resultados) {        
>         my ( $ID, $pais ) = @{$resultado}[ 0, 1 ];
>         push @{ $resultados{$ID} }, $pais;
> 
> Donde tengo que entrecomillar??

Yo me refería a las constantes que había puesto en mi código, para
imitar la consulta a una base de datos.


> while ( my @resultados = $sth->fetchrow_array ) {
> $resultado=\"$resultado\"; #<-Aquí??
>     foreach my $resultado (@resultados) { 
> 
> Imprime: Use of uninitialized value in concatenation (.) or string
> at ...

Pero, ¿qué línea? Si no pones todo el error, no sabremos dónde.

Creo que faltan algunas '}' al principio...

-- 
JF^D



From jluis en escomposlinux.org  Thu Jul 10 02:42:30 2008
From: jluis en escomposlinux.org (Jose Luis Perez Diez)
Date: Thu, 10 Jul 2008 11:42:30 +0200
Subject: [Madrid-pm] Crear listados desde una BD
In-Reply-To: <1ab0da440807100038t5a42b9ds17ef0f85b8b1ccd7@mail.gmail.com>
References: <1ab0da440807090336x360584cfs3c43cd78f02a5eed@mail.gmail.com>
	<1215649970.6386.6.camel@casa.aprosi.net>
	<1ab0da440807100038t5a42b9ds17ef0f85b8b1ccd7@mail.gmail.com>
Message-ID: <200807101142.30726.jluis@escomposlinux.org>

El Thursday, 10 de July de 2008 09:38:56 PEGG va escriure:
> Imprime: Use of uninitialized value in concatenation (.) or string at ...
> Ya le añadí el warnings.
Si quieres usar ese enfoque, Yo creo que esta versión es mas legible  

jpddb en debian:~$ perl test.pl
#!/usr/bin/perl

use strict;
use warnings;

system "cat $0";#Saca todo al terminal

my @resultados = (
    [ 1 , 'ESP' ],
    [ 1 , 'USA' ],
    [ 1 , 'ITA' ],
    [ 2 , 'JPN' ],
    [ 2 , 'RUS' ],
    [ 3 , 'VEN' ],
    [ 1 , 'CAN' ],#para justificar el primer bucle lista desordenada
);

# Leemos y hacemos la estadística
my %resultados;
foreach my $resultado ( @resultados ) {
    push @{$resultados{ ${$resultado}[0]}}, ${$resultado}[1];
}

# Sacamos las combinaciones
foreach my $grupo (values %resultados) {
    while (my $origen = shift @{$grupo}){
           print "$origen - $_\n" for @{$grupo};
    }
}
##### Salida #####ESP - USA
ESP - ITA
ESP - CAN
USA - ITA
USA - CAN
ITA - CAN
JPN - RUS
jpddb en debian:~$       

probada en 
This is perl, v5.8.8 built for i486-linux-gnu-thread-multi
This is perl, v5.10.0 built for i686-linux
This is perl, v5.8.8 built for arm-linux-gnueabi

From preiddy en gmail.com  Thu Jul 10 09:05:22 2008
From: preiddy en gmail.com (PEGG)
Date: Thu, 10 Jul 2008 18:05:22 +0200
Subject: [Madrid-pm] =?iso-8859-1?q?Quedada_t=E9cnica_ma=F1ana_!!!?=
In-Reply-To: <1ab0da440807100043s67850f24x3817a2188f5388c8@mail.gmail.com>
References: <4874DC9F.4020606@kuperman.com.ar>
	<6ae0d1e50807090940t25ef6b4dk9d884d790ae5fa00@mail.gmail.com>
	<1ab0da440807100043s67850f24x3817a2188f5388c8@mail.gmail.com>
Message-ID: <1ab0da440807100905y45e6bd60p9546b1ea0c3de636@mail.gmail.com>

ooooo, al final sigo aquí currando y no voy a poder ir.
Espero que se la pasen genial!!!!!
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080710/b0c98c97/attachment.html>

From diego en kuperman.com.ar  Thu Jul 24 02:49:13 2008
From: diego en kuperman.com.ar (Diego Kuperman)
Date: Thu, 24 Jul 2008 11:49:13 +0200
Subject: [Madrid-pm] Perl en google app engine :)
Message-ID: <48885019.6020801@kuperman.com.ar>

Hola!,

Desde la salida del GAE 
(http://code.google.com/appengine/docs/whatisgoogleappengine.html) 
muchos estamos con ganas de probarlo pero nos gustaria que sea en 
nuestro lenguaje favorito :)

Resulta que la cosa a cuajado en la ultima OSCON y algunos se estan 
poniendo manos a la obra (http://brad.livejournal.com/2388824.html)!

He estado leyendo la lista y los distintos articulos y me parecio 
suficientemente interesante como para compartirlo :)

http://code.google.com/p/perl-appengine/

Tambien interesante el grupo sobre cloud-computing en perl:

http://code.google.com/p/cloud-perl/

Saludos,

--dk

From explorer en joaquinferrero.com  Tue Jul 29 16:28:44 2008
From: explorer en joaquinferrero.com (Joaquin Ferrero)
Date: Wed, 30 Jul 2008 01:28:44 +0200
Subject: [Madrid-pm] European Perl Tour: Barcelona
Message-ID: <1217374124.9355.4.camel@portatil.aprosi.net>

http://use.perl.org/~brian_d_foy/journal/37049

-- 
JF^D


From pancho en pancho.name  Tue Jul 29 22:43:37 2008
From: pancho en pancho.name (Pancho Horrillo)
Date: Wed, 30 Jul 2008 07:43:37 +0200
Subject: [Madrid-pm] European Perl Tour: Barcelona
In-Reply-To: <1217374124.9355.4.camel@portatil.aprosi.net>
References: <1217374124.9355.4.camel@portatil.aprosi.net>
Message-ID: <20080730054337.GB3713@pancho.name>

On Wed, Jul 30, 2008 at 01:28:44AM +0200, Joaquin Ferrero wrote:
> http://use.perl.org/~brian_d_foy/journal/37049
> 
Yo de mayor quiero ser brian d foy.

Un saludote!

pancho.

-- 
pancho horrillo

To be conscious that
you are ignorant is a great step
to knowledge.

		Benjamin Disraeli
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 197 bytes
Desc: Digital signature
URL: <http://mail.pm.org/pipermail/madrid-pm/attachments/20080730/5a8b1e41/attachment.bin>