From ktalanetayahoo.es Tue Feb 6 08:59:43 2007 From: ktalanetayahoo.es (Miquel) Date: Tue, 6 Feb 2007 17:59:43 +0100 Subject: [bcn-pm] =?utf-8?q?S=C3=A8rie_d=27articles_sobre_Perl_+_XML?= Message-ID: <20070206175943.55bedb2c@angus> Hola Ja se que molts de vosaltres dirà 'bahhh, això ja està superat', però sempre es bò que IBM publiqui aquestes coses, oi? http://www-128.ibm.com/developerworks/xml/library/x-xmlperl1.html?ca=dgr-lnxw01XML-Simple Siau Miquel P.S. Recordeu que es una serie d'articles. ______________________________________________ LLama Gratis a cualquier PC del Mundo. Llamadas a fijos y móviles desde 1 céntimo por minuto. http://es.voice.yahoo.com From alexmaalexm.org Wed Feb 7 09:24:36 2007 From: alexmaalexm.org (Alex Muntada) Date: Wed, 7 Feb 2007 18:24:36 +0100 Subject: [bcn-pm] =?iso-8859-1?q?S=E8rie_d=27articles_sobre_Perl_+_XML?= In-Reply-To: <20070206175943.55bedb2c@angus> References: <20070206175943.55bedb2c@angus> Message-ID: <20070207182124.T6hro.alexm@alexm.org> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 * Miquel : [2007-02-06 17:59:43 +0100] > Ja se que molts de vosaltres dirà 'bahhh, això ja està superat' Miquel, aquest tipus d'articles sempre són molt interessants, encara que hom conegui el tema, perquè sempre hi ha alguna cosa nova per aprendre o algun detall que no està present en d'altres articles o a les pàgines del manual. Salut i Perl! - -- Alex Muntada http://alexm.org/ -----BEGIN PGP SIGNATURE----- iD8DBQFFygtRLdxCGS3zaBERAndVAKDRf/WvHZmqNOWYZToeDKRh/F/uJgCfZq00 DgdGQlQmHUk+icaOmxjoYYQ= =Nb3B -----END PGP SIGNATURE----- From joel.pinckheardagmail.com Thu Feb 8 02:07:35 2007 From: joel.pinckheardagmail.com (Joel Pinckheard) Date: Thu, 8 Feb 2007 11:07:35 +0100 Subject: [bcn-pm] European Perl Hackathon In-Reply-To: <20070203125314.134DD1158CC@ws1-7.us4.outblaze.com> References: <20070203125314.134DD1158CC@ws1-7.us4.outblaze.com> Message-ID: <391e184c0702080207v4b0e9f01q9e1f977edda14798@mail.gmail.com> Para vuestra informacion, perdon para el retraso en re-enviarlo. From: Ann Barcomb Subject: [Hackathons] Announcement: European Perl Hackathon Date: Thu, 1 Feb 2007 16:22:13 +0100 (CET) You are invited to attend the European Perl Hackathon in Arnhem, the Netherlands, from 2 - 4 March, 2007. Familiarity with the featured projects is not required; you need only bring a laptop and a willingness to join in. Although there is no fee to attend the hackathon, you are required to pay for your own accommodation and transportation. However, it is possible to book a room at the venue location when you register for the hackathon, at the price of 74 Euros for two nights plus breakfast. Space is limited to 30 participants, and registration is required. Reservations for accommodations made through the hackathon must be made by 9 February; reservations for the event itself must be made no later than 22 February. For more information about the event, please refer to http://conferences.yapceurope.org/hack2007nl Feel free to circulate this notice. -- Joel Pinckheard http://www.pincky.com/ From ktalanetayahoo.es Thu Feb 8 02:27:45 2007 From: ktalanetayahoo.es (Miquel) Date: Thu, 8 Feb 2007 11:27:45 +0100 Subject: [bcn-pm] European Perl Hackathon In-Reply-To: <391e184c0702080207v4b0e9f01q9e1f977edda14798@mail.gmail.com> References: <20070203125314.134DD1158CC@ws1-7.us4.outblaze.com> <391e184c0702080207v4b0e9f01q9e1f977edda14798@mail.gmail.com> Message-ID: <20070208112745.0f3c4351@angus> EL Thu, 8 Feb 2007 11:07:35 +0100 "Joel Pinckheard" escrigué: > Para vuestra informacion, perdon para el retraso en re-enviarlo. > > From: Ann Barcomb > Subject: [Hackathons] Announcement: European Perl Hackathon > Date: Thu, 1 Feb 2007 16:22:13 +0100 (CET) > > You are invited to attend the European Perl Hackathon in > Arnhem, the Netherlands, from 2 - 4 March, 2007. Familiarity > with the featured projects is not required; you need only bring > a laptop and a willingness to join in. > > Although there is no fee to attend the hackathon, you are required > to pay for your own accommodation and transportation. However, it is > possible to book a room at the venue location when you register for > the hackathon, at the price of 74 Euros for two nights plus breakfast. > > Space is limited to 30 participants, and registration is required. > Reservations for accommodations made through the hackathon must be > made by 9 February; reservations for the event itself must be made no > later than 22 February. > > For more information about the event, please refer to > http://conferences.yapceurope.org/hack2007nl > > Feel free to circulate this notice. > Es demasiado para mi nivel de Perl...seguro Saludos Miquel ______________________________________________ LLama Gratis a cualquier PC del Mundo. Llamadas a fijos y móviles desde 1 céntimo por minuto. http://es.voice.yahoo.com From jluisaescomposlinux.org Thu Feb 8 08:08:12 2007 From: jluisaescomposlinux.org (=?iso-8859-1?q?Jos=E9_Luis_P=E9rez_Diez?=) Date: Thu, 08 Feb 2007 17:08:12 +0100 Subject: [bcn-pm] Perl con vista y sin teclado Message-ID: <200702081710.20373.jluis@escomposlinux.org> http://www.youtube.com/watch?v=QkD90ZV07zo -------------- següent part -------------- Un adjunt de no-text ha estat eliminat... Nom: no disponible Tipus: application/pgp-signature volum: 189 bytes Desc: no disponible Url : http://mail.pm.org/pipermail/barcelona-pm/attachments/20070208/fc5c798a/attachment.bin From toomanyatoomany.net Thu Feb 8 08:50:45 2007 From: toomanyatoomany.net (TooMany Secrets) Date: Thu, 8 Feb 2007 17:50:45 +0100 Subject: [bcn-pm] Perl con vista y sin teclado In-Reply-To: <200702081710.20373.jluis@escomposlinux.org> References: <200702081710.20373.jluis@escomposlinux.org> Message-ID: 2007/2/8, José Luis Pérez Diez : > http://www.youtube.com/watch?v=QkD90ZV07zo Comencé a usar OS/2 en su versión 2.1.1 (creo que era), y el último que compré fué el 4, denominado OS/2 Warp Merlín. Corría entonces creo que el año 96, y ya entonces llevaba incorporado el reconocimiento de voz a nivel de sistema. Vamos, que eso que aparece en el vídeo como algo muy "cool" (palabro de la jerga del juanker), ya lo hacía sin problemas yo en el año 96 (¡¡once años antes!!). Ahora vienen los putos reyes del márketing (recordemos; año 2007) vendiéndolo como si fuese algo in-cre-i-ble y lo último de lo último... Por un lado odio a muerte a "lo'h mardito'h roedoreh" (léase Microshit), pero por otro pienso que qué suerte tenerlos para poder darnos cuenta de lo que tenemos (usuarios de los BSD, GNU/Linux y aún Mac OSX) xDDDDDD -- Have a nice day ;-) TooManySecrets ============================ Nine megs for the secretaries fair, Seven megs for the hackers scarce, Five megs for the grads in smoky lairs, Three megs for system source; One disk to rule them all, One disk to bind them, One disk to hold the files And in the darkness grind 'em. ============================ From arnauaemergetux.net Thu Feb 8 08:54:08 2007 From: arnauaemergetux.net (Arnau Bria) Date: Thu, 8 Feb 2007 17:54:08 +0100 Subject: [bcn-pm] Perl con vista y sin teclado In-Reply-To: References: <200702081710.20373.jluis@escomposlinux.org> Message-ID: <20070208175408.696c5457@lx-arnau.pic.es> On Thu, 8 Feb 2007 17:50:45 +0100 TooMany Secrets wrote: > 2007/2/8, José Luis Pérez Diez : > > http://www.youtube.com/watch?v=QkD90ZV07zo [...] > Por un lado odio a muerte a "lo'h mardito'h roedoreh" (léase > Microshit), pero por otro pienso que qué suerte tenerlos para poder > darnos cuenta de lo que tenemos (usuarios de los BSD, GNU/Linux y aún > Mac OSX) xDDDDDD Mac OSX = Windows = Código cerrado Además explotado por un tío que prohibió a sus desarrolladores desarrollar para *BSD en sus horas libres! No se quien es peor. Vale, él es Zen y mola más. salut! -- Arnau Bria http://blog.emergetux.net Wiggum: Dispara a las ruedas Lou. Lou: eee, es un tanque jefe. Wiggum: Me tienes hartito con todas tus excusas. From wjperezdagencat.net Fri Feb 9 04:14:22 2007 From: wjperezdagencat.net (Jose Luis Perez Diez) Date: Fri, 09 Feb 2007 13:14:22 +0100 Subject: [bcn-pm] Sustituir representaciones hexadecimales por caracteres Message-ID: <200702091314.24915.wjperezd@gencat.net> Se os occure alguna forma mejor de sustituir un flujo de representaciones hexadecimales separadas por espacios ( incluidos posbles saltos de linea ) a una secuencia de esos caracteres: perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < References: <200702091314.24915.wjperezd@gencat.net> Message-ID: <1171024774.8320.3.camel@next3.aprosi.net> El vie, 09-02-2007 a las 13:14 +0100, Jose Luis Perez Diez escribió: > Se os occure alguna forma mejor de sustituir un flujo de representaciones > hexadecimales separadas por espacios ( incluidos posbles saltos de linea ) a > una secuencia de esos caracteres: > > perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > 68 6f 6c > 61 > 20 6d 75 6e 64 6f 0a > EOF > hola mundo hola mundohola mundo explorer en next3:~> perl -ne 's/(\w+)/print chr hex $1/ge' < 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f 68 6f 6c 61 20 6d 75 6e 64 6f 0a > EOF hola mundo hola mundohola mundo -- Joaquin Ferrero From fxnahashref.com Fri Feb 9 06:15:49 2007 From: fxnahashref.com (Xavier Noria) Date: Fri, 9 Feb 2007 15:15:49 +0100 Subject: [bcn-pm] Sustituir representaciones hexadecimales por caracteres In-Reply-To: <200702091314.24915.wjperezd@gencat.net> References: <200702091314.24915.wjperezd@gencat.net> Message-ID: <31C2C583-5CEF-40BF-8F3C-AA38045905F7@hashref.com> On Feb 9, 2007, at 1:14 PM, Jose Luis Perez Diez wrote: > Se os occure alguna forma mejor de sustituir un flujo de > representaciones > hexadecimales separadas por espacios ( incluidos posbles saltos de > linea ) a > una secuencia de esos caracteres: > > perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > 68 6f 6c > 61 > 20 6d 75 6e 64 6f 0a > EOF > hola mundo hola mundohola mundo Otra solucion seria usar autosplit: perl -ane 'print chr hex for @F' pero ya va a gusto del consumidor. -- fxn From codeheadagmail.com Sun Feb 11 15:02:22 2007 From: codeheadagmail.com (Javier Rodriguez) Date: Sun, 11 Feb 2007 17:02:22 -0600 Subject: [bcn-pm] Sustituir representaciones hexadecimales por caracteres In-Reply-To: <200702091314.24915.wjperezd@gencat.net> References: <200702091314.24915.wjperezd@gencat.net> Message-ID: <3744eefe0702111502y5ee168a6ibf46ec7039d6afb5@mail.gmail.com> pack() esta mandado a hacer para esto $ perl -ne 'print pack("H*",join("",split(/[\s]/)));' << EOF 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f 68 6f 6c 61 20 6d 75 6e 64 6f 0a EOF hola mundo hola mundohola mundo Salud! -Javier Arturo Rodriguez On 2/9/07, Jose Luis Perez Diez wrote: > Se os occure alguna forma mejor de sustituir un flujo de representaciones > hexadecimales separadas por espacios ( incluidos posbles saltos de linea ) a > una secuencia de esos caracteres: > > perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > 68 6f 6c > 61 > 20 6d 75 6e 64 6f 0a > EOF > hola mundo hola mundohola mundo > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pm at pm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > From codeheadagmail.com Sun Feb 11 15:02:22 2007 From: codeheadagmail.com (Javier Rodriguez) Date: Sun, 11 Feb 2007 17:02:22 -0600 Subject: [bcn-pm] Sustituir representaciones hexadecimales por caracteres In-Reply-To: <200702091314.24915.wjperezd@gencat.net> References: <200702091314.24915.wjperezd@gencat.net> Message-ID: <3744eefe0702111502y5ee168a6ibf46ec7039d6afb5@mail.gmail.com> pack() esta mandado a hacer para esto $ perl -ne 'print pack("H*",join("",split(/[\s]/)));' << EOF 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f 68 6f 6c 61 20 6d 75 6e 64 6f 0a EOF hola mundo hola mundohola mundo Salud! -Javier Arturo Rodriguez On 2/9/07, Jose Luis Perez Diez wrote: > Se os occure alguna forma mejor de sustituir un flujo de representaciones > hexadecimales separadas por espacios ( incluidos posbles saltos de linea ) a > una secuencia de esos caracteres: > > perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > 68 6f 6c > 61 > 20 6d 75 6e 64 6f 0a > EOF > hola mundo hola mundohola mundo > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pm at pm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > From pbenaventagmail.com Sun Feb 11 22:35:02 2007 From: pbenaventagmail.com (Pere Benavent) Date: Mon, 12 Feb 2007 07:35:02 +0100 Subject: [bcn-pm] Sustituir representaciones hexadecimales por caracteres In-Reply-To: <3744eefe0702111502y5ee168a6ibf46ec7039d6afb5@mail.gmail.com> References: <200702091314.24915.wjperezd@gencat.net> <3744eefe0702111502y5ee168a6ibf46ec7039d6afb5@mail.gmail.com> Message-ID: Em fa l'efecte que haig d'agrair a http://bofhers.org l'avintesa per aprendre les conversions de hexadecimal a caracter ... però us heu fixat que un comentari de resposta l'han escrit en binari? On treballo en diuen "c2c"; Con2C*j*n*s ... :-) Una abraçada Pere PD: Us llegeixo però participo poc pel meu "nivell" de Perl. On 2/12/07, Javier Rodriguez wrote: > > pack() esta mandado a hacer para esto > > $ perl -ne 'print pack("H*",join("",split(/[\s]/)));' << EOF > 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > 68 6f 6c > 61 > 20 6d 75 6e 64 6f 0a > EOF > hola mundo hola mundohola mundo > > Salud! > -Javier Arturo Rodriguez > > On 2/9/07, Jose Luis Perez Diez wrote: > > Se os occure alguna forma mejor de sustituir un flujo de > representaciones > > hexadecimales separadas por espacios ( incluidos posbles saltos de linea > ) a > > una secuencia de esos caracteres: > > > > perl -ne'while (s/\W*(\w*)\W//){print chr(hex($1))}' < > 68 6f 6c 61 20 6d 75 6e 64 6f 20 68 6f 6c 61 20 6d 75 6e 64 6f > > 68 6f 6c > > 61 > > 20 6d 75 6e 64 6f 0a > > EOF > > hola mundo hola mundohola mundo > > _______________________________________________ > > llista dels Barcelona-pm > > Barcelona-pmapm.org > > http://mail.pm.org/mailman/listinfo/barcelona-pm > > BCN Perl Mongers: http://barcelona.pm.org > > > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > -- "El hombre es la medida de todas las cosas" Protágoras http://www.benavent.org -------------- següent part -------------- Un document HTML ha estat eliminat... URL: http://mail.pm.org/pipermail/barcelona-pm/attachments/20070212/364ac36d/attachment.html From d.ortizain.ilimit.es Tue Feb 13 09:27:59 2007 From: d.ortizain.ilimit.es (Daniel Ortiz) Date: Tue, 13 Feb 2007 18:27:59 +0100 Subject: [bcn-pm] Accents a fitxers Message-ID: <20070213172759.GG1192@in.ilimit.es> Bon dia, A veure si em podeu fer un cop de mà (segueixo la llista des de l'ombra xD). Estic fent un script que entre d'altres coses escriu unes dades a un fitxer, però quan algun caràcter te un accent, perdo la linea sencera. ----- CODE ----- open(LDIF, "> /tmp/$tmpfile"); print LDIF "dn: cn=$uid,ou=users,dc=example,dc=org\n"; print LDIF "cn: $uid\n"; print LDIF "sn: $name\n"; print LDIF "ou: users\n"; for($i=0;$i<$n_groups;$i++) { print LDIF "ou: $groups[$i]\n"; } print LDIF "gn: $sname\n"; print LDIF "objectClass: top\n"; print LDIF "objectClass: person\n"; ... ----- CODE ----- Si per exemple, $sname = "Rodríguez", en l'arxiu resultant només apareixerà 'Rodr'. Sabeu a que es degut o alguna solució? Gràcies. PD: M'he trobat el mateix problema fent servir sockets (els scripts es passen dades amb un script que fà de client i un altre de servidor) però ho he solucionat fent un 'pack("u*", $data);' abans de pasar les dades, es una burrada o hi ha una manera millor de fer-ho? -- -- Taik0/Daniel Ortiz d.ortiz at in.ilimit.es -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 187 bytes Desc: not available Url : http://mail.pm.org/pipermail/barcelona-pm/attachments/20070213/0acb0900/attachment.bin From toomanyatoomany.net Tue Feb 13 11:32:11 2007 From: toomanyatoomany.net (TooMany Secrets) Date: Tue, 13 Feb 2007 20:32:11 +0100 Subject: [bcn-pm] Off-Topic: Ruby. Message-ID: Holas. Espero me perdoneis por el abuso de confianza, pero me gustaría que, ya que hay gente en la lista con un nivel bastante alto, me dieseis vuestra opinión sobre el lenguaje Ruby. Personalmente estoy comenzando a usarlo y la verdad, realmente es muy intuitivo, aparte de que emho, el tema de la OO creo que lo tiene bastante más currado que en Perl. Pero bueno, el tema no es crear un flame, sino simplemente si alguno de vosotros lo ha usado y, ya que la experiencia es mucho mayor que la mía, indicar qué os parece, puntos fuertes y débiles, etc, etc. Gracias y saludos! -- Have a nice day ;-) TooManySecrets ============================ Nine megs for the secretaries fair, Seven megs for the hackers scarce, Five megs for the grads in smoky lairs, Three megs for system source; One disk to rule them all, One disk to bind them, One disk to hold the files And in the darkness grind 'em. ============================ From eduabadopi.org Tue Feb 13 12:04:33 2007 From: eduabadopi.org (Eduard =?ISO-8859-1?Q?Gim=E9nez?=) Date: Tue, 13 Feb 2007 21:04:33 +0100 Subject: [bcn-pm] Off-Topic: Ruby. In-Reply-To: References: Message-ID: <1171397073.30647.11.camel@localhost.localdomain> On Tue, 2007-02-13 at 20:32 +0100, TooMany Secrets wrote: > Pero bueno, el tema no es crear un flame, sino simplemente si alguno > de vosotros lo ha usado y, ya que la experiencia es mucho mayor que la > mía, indicar qué os parece, puntos fuertes y débiles, etc, etc. Yo he jugado un poco, nada serio, con él. Me gustan mucho todo el tema de closures, y funciones anónimas, et al. (que se puede hacer con perl, pero es algo más awkward). Y personalmente, y sin ánimo de levantar flames, ni nada (reitero, es sólo mi opinión personal), su sintaxis me gusta más :$ Los principales puntos débiles son que es leeento con ganas y que no está el CPAN!!! Poniendo en una balanza las ventajas/inconvenientes que le veo, Ruby sale perdiendo. -- edu "Oh, so they have internet on computers now!" Homer Jay Simpson From toomanyatoomany.net Wed Feb 14 00:01:07 2007 From: toomanyatoomany.net (TooMany Secrets) Date: Wed, 14 Feb 2007 09:01:07 +0100 Subject: [bcn-pm] Off-Topic: Ruby. In-Reply-To: <1171397073.30647.11.camel@localhost.localdomain> References: <1171397073.30647.11.camel@localhost.localdomain> Message-ID: El 13/02/07, Eduard Giménez escribió: > Yo he jugado un poco, nada serio, con él. Me gustan mucho todo el tema > de closures, y funciones anónimas, et al. (que se puede hacer con perl, > pero es algo más awkward). Y personalmente, y sin ánimo de levantar > flames, ni nada (reitero, es sólo mi opinión personal), su sintaxis me > gusta más :$ Personalmente también me gusta más su sintaxis. > Los principales puntos débiles son que es leeento con ganas y que no > está el CPAN!!! Bueno, lo bueno que tiene es su repositorio Gems y, mejor todavía, el gran apoyo que se está levantando en torno a él. Este tipo de "apoyos" son los que levantan los proyectos (quien me iba a decir a mí en el 94 que Linux estaría donde está hoy...). En cuanto a lentitud, pues nosotros lo utilizamos en el trabajo bastante (yo no, los compañeros programadores), y aunque no esté al nivel de Perl, no está nada mal. Además, el motor de regex es un "binario" (no sé cómo decirlo exactamente), con lo que es rapidísimo. Se espera que gracias al gran apoyo que está teniendo, para la versión 2.0 de ruby la lentitud pase a ser algo del pasado... > Poniendo en una balanza las ventajas/inconvenientes que le veo, Ruby > sale perdiendo. Ahí lo has clavao!! Exactamente!! A final de cuentas, todo se reduce a dos opciones: a) usar el que mejor se adapte a tus necesidades/circunstancias, o b) usar aquel con el que mejor y más cómodo estés. -- Have a nice day ;-) TooManySecrets ============================ Nine megs for the secretaries fair, Seven megs for the hackers scarce, Five megs for the grads in smoky lairs, Three megs for system source; One disk to rule them all, One disk to bind them, One disk to hold the files And in the darkness grind 'em. ============================ From victor.jalencasagmail.com Wed Feb 14 01:54:46 2007 From: victor.jalencasagmail.com (victor jalencas) Date: Wed, 14 Feb 2007 10:54:46 +0100 Subject: [bcn-pm] Off-Topic: Ruby. In-Reply-To: References: Message-ID: Yo me introduje en Ruby por culpa de Ruby on Rails. Habia oido hablar de él antes, pero me figuraba que solo me faltaba ponerme con otro lenguaje para olvidar más los que ya conozco. Pero mira, al final, me ha resultado mucho más fácil de pillar que perl, y características como su 'belleza', su orientación a objetos y su uso intensivo de closures y esas cosas, hacen que actualmente sea mi favorito. De hecho, por su culpa ahora siento curiosidad por smalltalk. Para mi, el hecho de que no hayan tantas librerias como en perl, es una oportunidad, no un defecto. En perl ya está prácticamente todo inventado, pero en ruby todavia quedan áreas por explorar. Cheers, Victor On 2/13/07, TooMany Secrets wrote: > > Holas. > > Espero me perdoneis por el abuso de confianza, pero me gustaría que, > ya que hay gente en la lista con un nivel bastante alto, me dieseis > vuestra opinión sobre el lenguaje Ruby. > Personalmente estoy comenzando a usarlo y la verdad, realmente es muy > intuitivo, aparte de que emho, el tema de la OO creo que lo tiene > bastante más currado que en Perl. > > Pero bueno, el tema no es crear un flame, sino simplemente si alguno > de vosotros lo ha usado y, ya que la experiencia es mucho mayor que la > mía, indicar qué os parece, puntos fuertes y débiles, etc, etc. > > Gracias y saludos! > > -- > Have a nice day ;-) > TooManySecrets > > ============================ > Nine megs for the secretaries fair, > Seven megs for the hackers scarce, > Five megs for the grads in smoky lairs, > Three megs for system source; > > One disk to rule them all, > One disk to bind them, > One disk to hold the files > And in the darkness grind 'em. > ============================ > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > -- Victor Jalencas -------------- següent part -------------- Un document HTML ha estat eliminat... URL: http://mail.pm.org/pipermail/barcelona-pm/attachments/20070214/068cf289/attachment.html From codeheadagmail.com Wed Feb 14 09:08:02 2007 From: codeheadagmail.com (Javier Rodriguez) Date: Wed, 14 Feb 2007 11:08:02 -0600 Subject: [bcn-pm] Accents a fitxers In-Reply-To: <20070213172759.GG1192@in.ilimit.es> References: <20070213172759.GG1192@in.ilimit.es> Message-ID: <3744eefe0702140908g1fcac358l71c25ac299d14c86@mail.gmail.com> Bueno, por convencion, en un archivo LDIF todos los atributos que tengan caracteres fuera del charset ASCII deben ser codificados en MIME-BASE64. Las lineas asi codificadas llevan dobles "dos puntos" despues del nombre en vez de solo uno. e.g. use MIME::Base64; ... print $val=~m/[ -z]/ ? "$name:: ".encode_base64($attr)."\n" : "$name: $attr\n"; Otra recomendacion que tampoco tiene que ver con Perl: organzationalUnit suele ser usado como un elemento estructural. Para denotar membresias de grupo es preferible utilizar memberOf (que es parte del esquema de Netscape/Sun Directory Server). Espero que esto ayude a resolver tu problema. Saludos, -Javier Arturo Rodriguez On 2/13/07, Daniel Ortiz wrote: > Bon dia, > > A veure si em podeu fer un cop de mà (segueixo la llista des de l'ombra > xD). > > Estic fent un script que entre d'altres coses escriu unes dades a un > fitxer, però quan algun caràcter te un accent, perdo la linea sencera. > > ----- CODE ----- > > open(LDIF, "> /tmp/$tmpfile"); > > print LDIF "dn: cn=$uid,ou=users,dc=example,dc=org\n"; > print LDIF "cn: $uid\n"; > print LDIF "sn: $name\n"; > print LDIF "ou: users\n"; > > for($i=0;$i<$n_groups;$i++) { > > print LDIF "ou: $groups[$i]\n"; > > } > > print LDIF "gn: $sname\n"; > print LDIF "objectClass: top\n"; > print LDIF "objectClass: person\n"; > ... > > > > ----- CODE ----- > > Si per exemple, $sname = "Rodríguez", en l'arxiu resultant només apareixerà > 'Rodr'. > > Sabeu a que es degut o alguna solució? > > Gràcies. > > PD: M'he trobat el mateix problema fent servir sockets (els scripts es > passen dades amb un script que fà de client i un altre de servidor) però > ho he solucionat fent un 'pack("u*", $data);' abans de pasar les dades, > es una burrada o hi ha una manera millor de fer-ho? > > > > -- > -- > > Taik0/Daniel Ortiz > d.ortiz at in.ilimit.es > > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pm at pm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > > From alexmaalexm.org Wed Feb 14 11:19:29 2007 From: alexmaalexm.org (Alex Muntada) Date: Wed, 14 Feb 2007 20:19:29 +0100 Subject: [bcn-pm] FW: Accents a fitxers Message-ID: <20070214201609.JbGoE.alexm@alexm.org> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Us reenvio aquest missatge a petició de l'Enrique, ja que no sabem per què no ha arribat a la llista cap dels 2 cops que ha provat d'enviar-lo. /alexm - ----- Forwarded message from Enrique Nell ----- From: Enrique Nell Sent: Wednesday, February 14, 2007 9:55 AM To: 'Barcelona Perl Mongers' Subject: RE: [bcn-pm] Accents a fitxers Hola Daniel Com obtens el valor de $sname? Aquestes coses solen passar al obtenir dades de cadenes que contenen caràcters accentuats mitjançant expressions regulars. En aquests casos, el millor és llegir les dades originals especificant la seva codificació, perquè Perl pugui treballar en context de caràcters: open my $in, "<:encoding(latin-1)", $input_path Perdó pel meu català de principiant. Enrique P.S.: Vaig contestar el missatge ahir a la nit, però sembla que la meva resposta no ha arribat. - ----- End forwarded message ----- -----BEGIN PGP SIGNATURE----- iD8DBQFF02CvLdxCGS3zaBERAptyAJ9RRUGRFBq8acw34yLcWsuZ9sIs8wCgzw+4 i/arFgYuSCTf0k7rB0xi3IA= =/YYQ -----END PGP SIGNATURE----- From jluisaescomposlinux.org Fri Feb 16 03:11:31 2007 From: jluisaescomposlinux.org (=?iso-8859-1?q?Jos=E9_Luis_P=E9rez_Diez?=) Date: Fri, 16 Feb 2007 12:11:31 +0100 Subject: [bcn-pm] Lisp? Message-ID: <200702161211.33631.jluis@escomposlinux.org> http://xkcd.com/c224.html From fxnahashref.com Fri Feb 16 03:22:35 2007 From: fxnahashref.com (Xavier Noria) Date: Fri, 16 Feb 2007 12:22:35 +0100 Subject: [bcn-pm] Lisp? In-Reply-To: <200702161211.33631.jluis@escomposlinux.org> References: <200702161211.33631.jluis@escomposlinux.org> Message-ID: <264399DF-CAE1-4898-B313-3CF575AA2D53@hashref.com> On Feb 16, 2007, at 12:11 PM, José Luis Pérez Diez wrote: > http://xkcd.com/c224.html Jajaja From jdelgadoalsi.upc.edu Fri Feb 16 03:37:33 2007 From: jdelgadoalsi.upc.edu (Jordi Delgado) Date: Fri, 16 Feb 2007 12:37:33 +0100 Subject: [bcn-pm] Lisp? In-Reply-To: <264399DF-CAE1-4898-B313-3CF575AA2D53@hashref.com> References: <200702161211.33631.jluis@escomposlinux.org> <264399DF-CAE1-4898-B313-3CF575AA2D53@hashref.com> Message-ID: <20070216113733.GA27986@nodoiuna.lsi.upc.edu> Buenas, > > http://xkcd.com/c224.html > > Jajaja Si, jaja, vale... Me lo he de tomar mal?!?! :-))) Salud! Jordi From brainstormanopcode.org Mon Feb 19 15:20:14 2007 From: brainstormanopcode.org (brainstorm) Date: Tue, 20 Feb 2007 00:20:14 +0100 Subject: [bcn-pm] Off-Topic: Ruby. In-Reply-To: References: Message-ID: <200702200020.15629.brainstorm@nopcode.org> "I always thought Smalltalk would beat Java, I just didn't know it would be called 'Ruby' when it did." ? Kent Beck On Tuesday 13 February 2007 20:32, TooMany Secrets wrote: > Holas. > > Espero me perdoneis por el abuso de confianza, pero me gustaría que, > ya que hay gente en la lista con un nivel bastante alto, me dieseis > vuestra opinión sobre el lenguaje Ruby. > Personalmente estoy comenzando a usarlo y la verdad, realmente es muy > intuitivo, aparte de que emho, el tema de la OO creo que lo tiene > bastante más currado que en Perl. > > Pero bueno, el tema no es crear un flame, sino simplemente si alguno > de vosotros lo ha usado y, ya que la experiencia es mucho mayor que la > mía, indicar qué os parece, puntos fuertes y débiles, etc, etc. > > Gracias y saludos! From xpegenauteatelepolis.es Tue Feb 20 00:20:33 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 09:20:33 +0100 Subject: [bcn-pm] regexp Message-ID: <45DAAF51.9090704@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, primer de tot salutacions a tothom, sóc nou a la llista :-). Després tinc un dubte, a veure si em podeu donar un cop de mà. Vull llegir d'un fitxer ascii una informació, ho faig a través de expressions regulars. La línia que m'interessa te aquesta pinta: "Identificador PNoImportant Paraula1 Paraula2" El que m'interessa d'aquesta línia es recollir les paraules del tipus "ParaulaXXX" i la posició que té dins de la línia (pex, Paraula1 = columna 2), m'han comentat això es pot fer amb expressions regulars estesses, però de moment no me n'he sortit. Ho he intentat amb coses com: > x $str =~ /^Identidicador\s+(?:(w+)\s+)/gc; però res .... :-) Algú te alguna idea de com fer-ho? Gràcies!!! -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF2q9RsZ9ijtD23KoRAgWXAKCAhkogdIKufrp/e6lV2oA9nsqTDACg0Gt7 LBHc2rvgjOD59SMmjz2TlOI= =WKDo -----END PGP SIGNATURE----- From jmereloageneura.ugr.es Tue Feb 20 00:37:39 2007 From: jmereloageneura.ugr.es (Juan Julian Merelo Guervos) Date: Tue, 20 Feb 2007 09:37:39 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DAAF51.9090704@telepolis.es> References: <45DAAF51.9090704@telepolis.es> Message-ID: <45DAB353.7000309@geneura.ugr.es> Xavier Pegenaute wrote: >-----BEGIN PGP SIGNED MESSAGE----- >Hash: SHA1 > >Hola, > >primer de tot salutacions a tothom, sóc nou a la llista :-). > >Després tinc un dubte, a veure si em podeu donar un cop de mà. > >Vull llegir d'un fitxer ascii una informació, ho faig a través de >expressions regulars. La línia que m'interessa te aquesta pinta: > >"Identificador PNoImportant Paraula1 Paraula2" > >El que m'interessa d'aquesta línia es recollir les paraules del tipus >"ParaulaXXX" i la posició que té dins de la línia (pex, Paraula1 = >columna 2), m'han comentat això es pot fer amb expressions regulars >estesses, però de moment no me n'he sortit. > >Ho he intentat amb coses com: > > > >>x $str =~ /^Identidicador\s+(?:(w+)\s+)/gc; >> >> > > > A ver si esto te funciona: -- while(<>) { my @paraules = /(\w+)\s+(\w+)$/; print "$paraules[0]: $-[0]; $paraules[1]: $-[2]\n"; } -- Sobre -- Identificador PNoImportant Paraula1 Paraula2 -- Da -- mellizo:~/progs/perl$ ./positions.pl positions.data Paraula1: 37; Paraula2: 51 -- Lo de @- lo he visto por primera vez; está en perlretut. Y no preguntéis por qué se salta una posición, no tengo ni idea. Teóricamente a $i le corresponde la posición $-[i] Probaré a ver cuál es $1... JJ From jmereloageneura.ugr.es Tue Feb 20 00:39:17 2007 From: jmereloageneura.ugr.es (Juan Julian Merelo Guervos) Date: Tue, 20 Feb 2007 09:39:17 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DAAF51.9090704@telepolis.es> References: <45DAAF51.9090704@telepolis.es> Message-ID: <45DAB3B5.7080809@geneura.ugr.es> Qué fallo tonto. En realidad $0 es el nombre del fichero, luego $-[0] (que correspondería a él) en realidad no tiene sentido. El correcto sería el de abajo. while(<>) { my @paraules = /(\w+)\s+(\w+)$/; print "$paraules[0]: $-[1]; $paraules[1]: $-[2]\n"; } JJ From xpegenauteatelepolis.es Tue Feb 20 01:02:12 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 10:02:12 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DAB3B5.7080809@geneura.ugr.es> References: <45DAAF51.9090704@telepolis.es> <45DAB3B5.7080809@geneura.ugr.es> Message-ID: <45DAB914.1030307@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, d'acord, es veritat, m'he deixat una dada :-), les paraules importants que tenen el prefix ParaulaXXX poden estar en qualsevol posició excepte la primera, poden apareixer un nombre indefinit de vegades i puc tenir paraules no interessants en qualsevol moment :-D Pex: "Identificador Paraula1 PNoImportant Paraula2 Paraula25" Juan Julian Merelo Guervos escribió: > Qué fallo tonto. En realidad $0 es el nombre del fichero, luego $-[0] > (que correspondería a él) en realidad no tiene sentido. El correcto > sería el de abajo. > > while(<>) { > my @paraules = /(\w+)\s+(\w+)$/; > print "$paraules[0]: $-[1]; $paraules[1]: $-[2]\n"; > } > > > JJ > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF2rkUsZ9ijtD23KoRAozDAKCKSOQgJe69/1f6/dae6EYQyNtgpwCg0IS2 N/nk57fvXKGKoyorAMaWdhI= =7P/v -----END PGP SIGNATURE----- From jmereloageneura.ugr.es Tue Feb 20 01:08:35 2007 From: jmereloageneura.ugr.es (Juan Julian Merelo Guervos) Date: Tue, 20 Feb 2007 10:08:35 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DAB914.1030307@telepolis.es> References: <45DAAF51.9090704@telepolis.es> <45DAB3B5.7080809@geneura.ugr.es> <45DAB914.1030307@telepolis.es> Message-ID: <45DABA93.4010702@geneura.ugr.es> Xavier Pegenaute wrote: >-----BEGIN PGP SIGNED MESSAGE----- >Hash: SHA1 > >Hola, > >d'acord, es veritat, m'he deixat una dada :-), les paraules importants >que tenen el prefix ParaulaXXX poden estar en qualsevol posició excepte >la primera, poden apareixer un nombre indefinit de vegades i puc tenir >paraules no interessants en qualsevol moment :-D > > > ¿Cómo distingues las palabras importantes de las no importantes? JJ From jmereloageneura.ugr.es Tue Feb 20 01:24:38 2007 From: jmereloageneura.ugr.es (Juan Julian Merelo Guervos) Date: Tue, 20 Feb 2007 10:24:38 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DABA93.4010702@geneura.ugr.es> References: <45DAAF51.9090704@telepolis.es> <45DAB3B5.7080809@geneura.ugr.es><45DAB914.1030307@telepolis.es> <45DABA93.4010702@geneura.ugr.es> Message-ID: <45DABE56.6010805@geneura.ugr.es> Juan Julian Merelo Guervos wrote: >Xavier Pegenaute wrote: > > > >>-----BEGIN PGP SIGNED MESSAGE----- >>Hash: SHA1 >> >>Hola, >> >>d'acord, es veritat, m'he deixat una dada :-), les paraules importants >>que tenen el prefix ParaulaXXX poden estar en qualsevol posició excepte >>la primera, poden apareixer un nombre indefinit de vegades i puc tenir >>paraules no interessants en qualsevol moment :-D >> >> >> >> >> >¿Cómo distingues las palabras importantes de las no importantes? > > Lo digo porque puedes hacer algo así como @paraules_imp = /(regexparaulesi)/g; y luego for my $p (0..$#paraules_imp) { print "$paraules_imp[$p]: ", eval "$"."-[".$p+1."]" ; } JJ From blas.gordonagmail.com Tue Feb 20 01:35:24 2007 From: blas.gordonagmail.com (Enrique Nell) Date: Tue, 20 Feb 2007 10:35:24 +0100 Subject: [bcn-pm] regexp Message-ID: Hola Xavier ¿Puedes enviar un ejemplo de línea? Suponiendo que te refieres a líneas que contienen cosas como "Paraula22Indefinit", en principio, podrías hacerlo así: while (<$fh>) { chomp; my @words = split /\s+/; for (my $i = 0; $i<=$#words; $i++) { if ($words[$i] =~ /Paraula\d{1,3}(.+)$/) { print "Columna ", $i+1, ": $1\n"; } } } From xpegenauteatelepolis.es Tue Feb 20 01:56:25 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 10:56:25 +0100 Subject: [bcn-pm] regexp In-Reply-To: References: Message-ID: <45DAC5C9.5000309@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, si, al final lo haré mas o menos así. Si acaso luego os paso un ejemplo mas y os formulo la pregunta de otra manera. Gracias por todo!! Xavi. Enrique Nell escribió: > Hola Xavier > > ¿Puedes enviar un ejemplo de línea? > Suponiendo que te refieres a líneas que contienen cosas como > "Paraula22Indefinit", en principio, podrías hacerlo así: > > while (<$fh>) { > chomp; > > my @words = split /\s+/; > > for (my $i = 0; $i<=$#words; $i++) { > if ($words[$i] =~ /Paraula\d{1,3}(.+)$/) { > print "Columna ", $i+1, ": $1\n"; > } > } > } > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF2sXJsZ9ijtD23KoRAn21AJ9HtePuXTQNCIjXPA+6pjYFAyWO2gCfXF8v dTCi+rrAcFx4pO5YwZPy/Xk= =uALa -----END PGP SIGNATURE----- From blas.gordonagmail.com Tue Feb 20 02:05:14 2007 From: blas.gordonagmail.com (Enrique Nell) Date: Tue, 20 Feb 2007 11:05:14 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DAC5C9.5000309@telepolis.es> References: <45DAC5C9.5000309@telepolis.es> Message-ID: Te envío una versión que incluye el número de línea en los resultados: my $file = 'test.txt'; open my $fh, '<', $file; while (<$fh>) { chomp; print "Line: $.\n"; my @words = split /\s+/; for (my $i = 0; $i<=$#words; $i++) { if ($words[$i] =~ /Paraula\d{1,3}(.+)$/) { print "Columna ", $i+1, ": $1\n"; } } print "\n"; } close $fh; Saludos Enrique On 2/20/07, Xavier Pegenaute wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > Hola, > > si, al final lo haré mas o menos así. Si acaso luego os paso un ejemplo > mas y os formulo la pregunta de otra manera. > > Gracias por todo!! > Xavi. From xpegenauteatelepolis.es Tue Feb 20 06:15:47 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 15:15:47 +0100 Subject: [bcn-pm] regexp In-Reply-To: References: <45DAC5C9.5000309@telepolis.es> Message-ID: <45DB0293.1020202@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, lo que quería ya lo tengo solucionado, ahora bien, la duda ya es algo mas personal, tengo una linea dentro de un fichero como: "Indicativo PREF_1 noimporta PREF_2 PREF_3" Donde como antes la linea siempre empieza por "Indicativo" luego le siguen un conjunto de palabras que solo un subconjunto de ellas es importante, en este ejemplo las que tienen como prefijo "PREF". La cantidad y el orden de aparición (después de "Indicativo") es desconocido. Podría EN UNA LINEA hacer: 1) Detectar que la línea me interesa. 2) Parsear la linea. 3) Devolver un array de todas la palabras que empiezan con "PREF". ?? Saludos Gracias :-) -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF2wKSsZ9ijtD23KoRAlzjAJ9+KKQfYRLIhkFE0qfSQLShUZbIJgCfQ8PT jKyf++PAVde3ja+7cQvJlXc= =fjsW -----END PGP SIGNATURE----- From blas.gordonagmail.com Tue Feb 20 07:23:47 2007 From: blas.gordonagmail.com (Enrique Nell) Date: Tue, 20 Feb 2007 16:23:47 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DB0293.1020202@telepolis.es> References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> Message-ID: Podrías incluir la línea siguiente en el bucle while (suponiendo que el prefijo es PREF, no PREF_): my @words = $_ =~ /(?:^|\s)PREF(.+?)(?=$|\s)/g; No sé si te refieres a esto o a una solución a lo Severiano Ballesteros. Saludos Enrique On 2/20/07, Xavier Pegenaute wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > Hola, > > lo que quería ya lo tengo solucionado, ahora bien, la duda ya es algo > mas personal, tengo una linea dentro de un fichero como: > > "Indicativo PREF_1 noimporta PREF_2 PREF_3" > > Donde como antes la linea siempre empieza por "Indicativo" luego le > siguen un conjunto de palabras que solo un subconjunto de ellas es > importante, en este ejemplo las que tienen como prefijo "PREF". > La cantidad y el orden de aparición (después de "Indicativo") es > desconocido. Podría EN UNA LINEA hacer: > 1) Detectar que la línea me interesa. > 2) Parsear la linea. > 3) Devolver un array de todas la palabras que empiezan con "PREF". > > ?? > > Saludos > Gracias :-) > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.4.5 (GNU/Linux) > Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org > > iD8DBQFF2wKSsZ9ijtD23KoRAlzjAJ9+KKQfYRLIhkFE0qfSQLShUZbIJgCfQ8PT > jKyf++PAVde3ja+7cQvJlXc= > =fjsW > -----END PGP SIGNATURE----- > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > From fxnahashref.com Tue Feb 20 07:41:10 2007 From: fxnahashref.com (Xavier Noria) Date: Tue, 20 Feb 2007 16:41:10 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DB0293.1020202@telepolis.es> References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> Message-ID: <0E8BFFE6-D357-4C0E-8A98-DFCB4E0E656E@hashref.com> On Feb 20, 2007, at 3:15 PM, Xavier Pegenaute wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > Hola, > > lo que quería ya lo tengo solucionado, ahora bien, la duda ya es algo > mas personal, tengo una linea dentro de un fichero como: > > "Indicativo PREF_1 noimporta PREF_2 PREF_3" > > Donde como antes la linea siempre empieza por "Indicativo" luego le > siguen un conjunto de palabras que solo un subconjunto de ellas es > importante, en este ejemplo las que tienen como prefijo "PREF". > La cantidad y el orden de aparición (después de "Indicativo") es > desconocido. Podría EN UNA LINEA hacer: > 1) Detectar que la línea me interesa. > 2) Parsear la linea. > 3) Devolver un array de todas la palabras que empiezan con "PREF". Si tens la linia a $line: my @words = $line =~ /\b(PREF\w*)/g; if (@words) { # aquesta linia interessa } Pots interpolar "PREF" si fos variable, usar foreach en comptes d'if, etc., pero veus la idea. -- fxn From xpegenauteatelepolis.es Tue Feb 20 08:52:23 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 17:52:23 +0100 Subject: [bcn-pm] regexp In-Reply-To: References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> Message-ID: <45DB2747.4070006@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, ...., pero esta línea no me descarta otras líneas que aunque contengan PREF, no empieza por "Indiciativo". Aún así, no entinedo muy bien que hace, te explico lo que leo, a ver si me aclaro..: (?:^|\s)PREF, indica que el match puede estar a inicio de línea o que tenga un espacio delante, esta dentro de un grupo (), pero no contaremos con el para referenciarlo via $1,$2..., por el "?:", seguidamente viene PREF. Después de PREF puede venir cualquier caracter. El interrogante no se que hace, pero me imagino que lo substituye por lo que aparace en el siguiente parentesis, que puede ser find de línea o un espacio. Como esta dentro de parentesis normales, será lo que se devuelve. En que estoy equivocado? Gracias. Enrique Nell escribió: > Podrías incluir la línea siguiente en el bucle while (suponiendo que > el prefijo es PREF, no PREF_): > > my @words = $_ =~ /(?:^|\s)PREF(.+?)(?=$|\s)/g; > > No sé si te refieres a esto o a una solución a lo Severiano Ballesteros. -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD4DBQFF2ydHsZ9ijtD23KoRAibvAJiSL+kY2W/+T76FA7ljD0nLkM+kAJwPihbT ZhXc905NWNWwTSBqypOF5A== =3VGF -----END PGP SIGNATURE----- From xpegenauteatelepolis.es Tue Feb 20 08:54:59 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Tue, 20 Feb 2007 17:54:59 +0100 Subject: [bcn-pm] regexp In-Reply-To: <0E8BFFE6-D357-4C0E-8A98-DFCB4E0E656E@hashref.com> References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> <0E8BFFE6-D357-4C0E-8A98-DFCB4E0E656E@hashref.com> Message-ID: <45DB27E3.6030309@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, si, però m'interessaría que només continues el matching al trobar la paraula "Indicativo" com a inici de línea, i a més m'agradaría saber si es possible fer tot això amb una sola expressió regular. Gracies!! Xavier Noria escribió: > > Si tens la linia a $line: > > my @words = $line =~ /\b(PREF\w*)/g; > if (@words) { > # aquesta linia interessa > } > > Pots interpolar "PREF" si fos variable, usar foreach en comptes d'if, > etc., pero veus la idea. > -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF2yfjsZ9ijtD23KoRAiWgAKDKnWZbnKsR0EgaqUXwRDRivxUZUACfUriI M06Z38yhESaK9AeEla0tz7Y= =FyP9 -----END PGP SIGNATURE----- From blas.gordonagmail.com Tue Feb 20 09:20:56 2007 From: blas.gordonagmail.com (Enrique Nell) Date: Tue, 20 Feb 2007 18:20:56 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DB2747.4070006@telepolis.es> References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> <45DB2747.4070006@telepolis.es> Message-ID: Podrías hacer esto: my @words; @words = $_ =~ /(?:^|\s)PREF(.+?)(?=$|\s)/g if /^Indicativo\b/; Como ves, no incluyo PREF en las palabras. Si quisieras incluirlo sólo tendrías que mover el paréntesis a la izquierda. Utilizo (.+?)(?=$|\s) en lugar de \w para que las palabras no se me corten en los caracteres acentuados (suponiendo que leemos el archivo sin especificar su codificación). El cuantificador perezoso (+?) a continuación del punto hace que la detección se corte al llegar al primer espacio. Saludos Enrique From fxnahashref.com Tue Feb 20 09:48:04 2007 From: fxnahashref.com (Xavier Noria) Date: Tue, 20 Feb 2007 18:48:04 +0100 Subject: [bcn-pm] regexp In-Reply-To: <45DB27E3.6030309@telepolis.es> References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> <0E8BFFE6-D357-4C0E-8A98-DFCB4E0E656E@hashref.com> <45DB27E3.6030309@telepolis.es> Message-ID: On Feb 20, 2007, at 5:54 PM, Xavier Pegenaute wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > Hola, > > si, però m'interessaría que només continues el matching al trobar la > paraula "Indicativo" com a inici de línea, i a més m'agradaría > saber si > es possible fer tot això amb una sola expressió regular. Una opcio es posar un filter al principi, si encaixa amb com ho tens muntat queda net: while (my $line = <$fh>) { next if $line !~ /^Indicativo\b/; my @words = $line =~ /\b(PREF\w*)/g; foreach my $word (@words) { # ... } } -- fxn From esteveasindominio.net Tue Feb 20 13:47:54 2007 From: esteveasindominio.net (Esteve Fernandez) Date: Tue, 20 Feb 2007 22:47:54 +0100 Subject: [bcn-pm] Oferta de feina Message-ID: <200702202247.55836.esteve@sindominio.net> Hola, perdoneu l'offtopic, però potser algú hi pot estar interessat. A l'empresa on treballo (BMAT [1]), estem ampliant l'equip. BMAT és una spin-off del Grup de Tecnologia Musical (MTG [2]) de la Universitat Pompeu Fabra, un dels grups de recerca sobre música més gran del món. Fem sistemes de recomanació musical intel.ligents, anàlisi i síntesi d'àudio i fins i tot sistemes per cantar en el karaoke ;) Hi ha dos tipus de places vacants: desenvolupadors i administradors. Per tots dos els requisits serien a grans trets tenir un bon nivell d'anglès, parlat i escrit (tant l'equip de l'MTG com de BMAT són bastant internacionals). A més, seguint els "doctrines" [3] [4] de Paul Graham (sic), és important tenir soltesa amb Perl, Python o Ruby. Concretant una mica més, a més a més dels requisits anteriors, per la plaça de desenvolupador són necessaris coneixements sòlids d'enginyeria del programari, l'experiència amb C++ i Java són valorables. Per la d'administrador, a més dels requisits generals, és necessari tenir alt nivell de Linux en servidors, valorable experiència amb aplicacions crítiques, d'alta disponibilitat i escalables. Si algú està interessat, pot contactar amb mi a esteve en bmat.com o a jobs en bmat.com Salutacions. [1] - http://www.bmat.com [2] - http://mtg.upf.edu [3] - http://www.paulgraham.com/pypar.html [4] - http://www.paulgraham.com/avg.html From xpegenauteatelepolis.es Wed Feb 21 04:07:12 2007 From: xpegenauteatelepolis.es (Xavier Pegenaute) Date: Wed, 21 Feb 2007 13:07:12 +0100 Subject: [bcn-pm] regexp In-Reply-To: References: <45DAC5C9.5000309@telepolis.es> <45DB0293.1020202@telepolis.es> <0E8BFFE6-D357-4C0E-8A98-DFCB4E0E656E@hashref.com> <45DB27E3.6030309@telepolis.es> Message-ID: <45DC35F0.6040704@telepolis.es> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Hola, bueno, crec que ja he saciat la meva curiositat, gràcies per tot! Xavi. Xavier Noria escribió: > On Feb 20, 2007, at 5:54 PM, Xavier Pegenaute wrote: > >> -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 >> >> Hola, >> >> si, però m'interessaría que només continues el matching al trobar >> la paraula "Indicativo" com a inici de línea, i a més >> m'agradaría saber si es possible fer tot això amb una sola >> expressió regular. > > Una opcio es posar un filter al principi, si encaixa amb com ho > tens muntat queda net: > > while (my $line = <$fh>) { next if $line !~ /^Indicativo\b/; > > my @words = $line =~ /\b(PREF\w*)/g; foreach my $word (@words) { # > ... } } > > -- fxn > > _______________________________________________ llista dels > Barcelona-pm Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm BCN Perl Mongers: > http://barcelona.pm.org -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.5 (GNU/Linux) Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org iD8DBQFF3DXwsZ9ijtD23KoRAghVAJwI2RSC1sTi1XpjMcw46uiLxfAQ/ACfe3R6 SEGiGZdPVf0IQkx5bv+YvZk= =Z5O0 -----END PGP SIGNATURE----- From jluisaescomposlinux.org Thu Feb 22 02:22:56 2007 From: jluisaescomposlinux.org (=?iso-8859-1?q?Jos=E9_Luis_P=E9rez_Diez?=) Date: Thu, 22 Feb 2007 11:22:56 +0100 Subject: [bcn-pm] Reunion Message-ID: <200702221122.59456.jluis@escomposlinux.org> Simplemente recordar que hoy es ultimo jueves del mes From adhermlagmail.com Thu Feb 22 08:39:05 2007 From: adhermlagmail.com (=?ISO-8859-1?Q?Adri=E1n_H._-_wzzx?=) Date: Thu, 22 Feb 2007 17:39:05 +0100 Subject: [bcn-pm] Reunion In-Reply-To: <200702221122.59456.jluis@escomposlinux.org> References: <200702221122.59456.jluis@escomposlinux.org> Message-ID: <51a9e5e20702220839x66537e74x6e78ecc0ee264d0f@mail.gmail.com> Menos mal que lo has dicho! :D El día 22/02/07, José Luis Pérez Diez escribió: > > Simplemente recordar que hoy es ultimo jueves del mes > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pm en pm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > -- Slds. Adrián H. JID: wzzx en nopcode.org ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: http://mail.pm.org/pipermail/barcelona-pm/attachments/20070222/9b25e0f7/attachment.html From wjperezdagencat.net Thu Feb 22 23:51:39 2007 From: wjperezdagencat.net (Jose Luis Perez Diez) Date: Fri, 23 Feb 2007 08:51:39 +0100 Subject: [bcn-pm] Regex Emilio By Abigail Message-ID: <200702230851.41769.wjperezd@gencat.net> Newsgroups: comp.lang.perl.misc From: Abigail Subject: Regexp for email addresses. Reply-To: abigail at abigail.be X-Date: MMMMCMXV September MCMXCIII Organization: Abigail's Kinderboerderijen X-HTTP: http://www.abigail.be/ X-Revision: $Revision: 1.2 $ Message-Id: User-Agent: slrn/0.9.7.4 (Linux) Date: 14 Feb 2007 21:55:40 GMT Lines: 57 use 5.9.5; # In fact, you need the newest blead. my $email_address = qr { (?(DEFINE) (? (?&local_part) \@ (?&domain)) (? (?&dot_atom) | (?"ed_string)) (? (?&dot_atom) | (?&domain_literal)) (? (?&CFWS)? \[ (?: (?&FWS)? (?&dcontent))* (?&FWS)? \] (?&CFWS)?) (? (?&dtext) | (?"ed_pair)) (? (?&NO_WS_CTL) | [\x21-\x5a\x5e-\x7e]) (? (?&ALPHA) | (?&DIGIT) | [!#\$%&'*+-/=?^_`{|}~]) (? (?&CFWS)? (?&atext)+ (?&CFWS)?) (? (?&CFWS)? (?&dot_atom_text) (?&CFWS)?) (? (?&atext)+ (?: \. (?&atext)+)*) (? [\x01-\x09\x0b\x0c\x0e-\x7f]) (? \\ (?&text)) (? (?&NO_WS_CTL) | [\x21\x23-\x5b\x5d-\x7e]) (? (?&qtext) | (?"ed_pair)) (? (?&CFWS)? (?&DQUOTE) (?:(?&FWS)? (?&qcontent))* (?&FWS)? (?&DQUOTE) (?&CFWS)?) (? (?&atom) | (?"ed_string)) (? (?&word)+) # Folding white space (? (?: (?&WSP)* (?&CRLF))? (?&WSP)+) (? (?&NO_WS_CTL) | [\x21-\x27\x2a-\x5b\x5d-\x7e]) (? (?&ctext) | (?"ed_pair) | (?&comment)) (? \( (?: (?&FWS)? (?&ccontent))* (?&FWS)? \) ) (? (?: (?&FWS)? (?&comment))* (?: (?:(?&FWS)? (?&comment)) | (?&FWS))) # No whitespace control (? [\x01-\x08\x0b\x0c\x0e-\x1f\x7f]) (? [A-Za-z]) (? [0-9]) (? \x0d \x0a) (? ") (? [\x20\x09]) ) (?&addr_spec) }x; Abigail -- perl -wlpe '}{$_=$.}{' file # Count the number of lines. From wjperezdagencat.net Fri Feb 23 04:17:58 2007 From: wjperezdagencat.net (Jose Luis Perez Diez) Date: Fri, 23 Feb 2007 13:17:58 +0100 Subject: [bcn-pm] Tira de raulito el friqui Message-ID: <200702231318.01569.wjperezd@gencat.net> http://recurrente.afraid.org/myblog/?q=ultima From victor.jalencasagmail.com Fri Feb 23 05:00:38 2007 From: victor.jalencasagmail.com (victor jalencas) Date: Fri, 23 Feb 2007 14:00:38 +0100 Subject: [bcn-pm] Tira de raulito el friqui In-Reply-To: <200702231318.01569.wjperezd@gencat.net> References: <200702231318.01569.wjperezd@gencat.net> Message-ID: Ya lo he puesto en los comentarios... me parece de un sexista que espanta! On 2/23/07, Jose Luis Perez Diez wrote: > > http://recurrente.afraid.org/myblog/?q=ultima > _______________________________________________ > llista dels Barcelona-pm > Barcelona-pmapm.org > http://mail.pm.org/mailman/listinfo/barcelona-pm > BCN Perl Mongers: http://barcelona.pm.org > -- Victor Jalencas -------------- següent part -------------- Un document HTML ha estat eliminat... URL: http://mail.pm.org/pipermail/barcelona-pm/attachments/20070223/b7ce8a3b/attachment.html