From ctam at worldnet.fr Fri Feb 1 14:14:16 2002 From: ctam at worldnet.fr (=?iso-8859-1?q?Crist=F3bal=20Alvarado=20Minic?=) Date: Wed Aug 4 23:59:28 2004 Subject: Leer dos =?iso-8859-1?q?l=EDneas=20a=20la=20vez?= Message-ID: <02020121141604.31191@dec47> Hola, les tengo una pregunta: ?c?mo hacer en Perl para leer desde un archivo dos l?neas al mismo tiempo? Al interior de un while (<>) { ... la variable $_ contiene la l?nea actual. Dispongo de un archivo de datos en el cual cada fila est? cortada por un car?cter de retorno del carro, y lo ?nico que quiero hacer es "pegarlas": 1a 2a 3a 4a 5a -----> 1a 2a 3a 4a 5a 6a 7a 8a 6a 7a 8a 1b 2b 3b 4b 5b -----> 1b 2b 3b 4b 5b 6b 7b 8b 6b 7b 8b ...y as? sucesivamente. Me vino la idea de usar split para dividir la l?nea en curso y meter cada elemento de un par de l?neas a la vez en una variable, pero lo ?nico que no hallo c?mo hacer es leer _dos_ l?neas al mismo tiempo... Agradezco cualquier idea que puedan suministrarme :-) -- Crist?bal Alvarado Minic Laboratoire de Physique des Milieux Ionis?s et Applications LPMIA - CNRS 7040 Universit? Henri Poincar? Nancy I - Boulevard des Aiguillettes BP 239 - 54506 Vandoeuvre-l?s-Nancy Cedex - France tel: (33) 03 83 91 21 09 - fax: (33) 03 83 27 34 98 E-mail: ctam@worldnet.fr ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From jnatera at net-uno.net Fri Feb 1 14:39:13 2002 From: jnatera at net-uno.net (Juan Jose Natera Abreu) Date: Wed Aug 4 23:59:28 2004 Subject: Leer dos =?ISO-8859-1?Q?l=EDneas?= a la vez References: <02020121141604.31191@dec47> Message-ID: <3C5AFCF1.6060808@net-uno.net> Hola Cristobal, que te parece esto? while (<>) { chomp; $_ .= <>; print; } Saludos, Juan Jose ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From jrey at linuxsis.net Fri Feb 1 16:15:10 2002 From: jrey at linuxsis.net (Jose Rey) Date: Wed Aug 4 23:59:28 2004 Subject: =?iso-8859-1?Q?RE:_Leer_dos_l=EDneas_a_la_vez?= References: <02020121141604.31191@dec47> Message-ID: <038c01c1ab6d$ff5d63e0$220ba8c0@hr.lxs> Si solo quieres hacer join de las l?neas impares y pares: while(<>) { chomp; print $_ . <>; } Saludos Jose Luis Rey ----- Original Message ----- From: Crist?bal Alvarado Minic To: Perl Mongers Caracas Sent: Friday, February 01, 2002 4:14 PM Subject: Leer dos l?neas a la vez > > Hola, les tengo una pregunta: ?c?mo hacer en Perl para leer desde un > archivo dos l?neas al mismo tiempo? Al interior de un > > while (<>) { ... > > la variable $_ contiene la l?nea actual. Dispongo de un archivo de datos en > el cual cada fila est? cortada por un car?cter de retorno del carro, y lo > ?nico que quiero hacer es "pegarlas": > > 1a 2a 3a 4a 5a -----> 1a 2a 3a 4a 5a 6a 7a 8a > 6a 7a 8a > 1b 2b 3b 4b 5b -----> 1b 2b 3b 4b 5b 6b 7b 8b > 6b 7b 8b > > ...y as? sucesivamente. Me vino la idea de usar split para dividir la l?nea > en curso y meter cada elemento de un par de l?neas a la vez en una variable, > pero lo ?nico que no hallo c?mo hacer es leer _dos_ l?neas al mismo tiempo... > Agradezco cualquier idea que puedan suministrarme :-) > > -- > Crist?bal Alvarado Minic > Laboratoire de Physique des Milieux Ionis?s et Applications > LPMIA - CNRS 7040 > Universit? Henri Poincar? Nancy I - Boulevard des Aiguillettes > BP 239 - 54506 Vandoeuvre-l?s-Nancy Cedex - France > tel: (33) 03 83 91 21 09 - fax: (33) 03 83 27 34 98 > E-mail: ctam@worldnet.fr > ------------------------------------------------------------------------ > Enviar e-mail a colocando en el cuerpo: > "UNSUBSCRIBE caracas-pm-list" para desuscribirse. > "INFO caracas-pm-list" para conocer las reglas de etiqueta. > ------------------------------------------------------------------------ ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From emhn at telcel.net.ve Fri Feb 1 18:50:40 2002 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Aug 4 23:59:28 2004 Subject: =?iso-8859-1?Q?RE:_Leer_dos_l=EDneas_a_la_vez?= In-Reply-To: <038c01c1ab6d$ff5d63e0$220ba8c0@hr.lxs> Message-ID: On Fri, 1 Feb 2002, Jose Rey wrote: > Si solo quieres hacer join de las l?neas impares y pares: > > while(<>) { > chomp; > print $_ . <>; > } Partiendo de la premisa de Jos? Luis y eliminado el bug. El archivo debe tener un n?mero par de l?neas, por supuesto. perl -pe 'chomp; $_ .= " " . <> if ($. % 2)' archivo Agregas -i para editar "in situ". Ahora, elucubrando en lo profundo de mi cochambrosa mente while ($_ = <> . <>) { s/\n/ /; print; } Funciona y se ve diab?lico :-) Caveat emptor: funciona con siempre, y con <> funciona siempre y cuando la redirecci?n de entrada en la l?nea de comando sea tipo hack.pl < archivo porque con hack.pl archivo va a intentar dos lecturas de STDIN y se queda "esperando". El que diga que Perl no es art?stico nunca ha programado por pura diversi?n. Y s?, yo s? que hay ayuda para gente como yo... pero nadie me atiende -- Ernesto Hern?ndez-Novich - Running Linux 2.4.16 i686 - Unix: Live free or die! -----BEGIN GEEK CODE BLOCK----- Version: 3.1 GCS d+(-) s+: a C+++$ UBLAVHIOSC++++$ P++++$ L+++$ E- W+ N++ ?o ?K w--- O- M- V PS+ PE Y+ PGP>++ t+ 5 X+ R* tv+ b++ DI+++$ D++ G>++ e++ h+ r+ y++ -----END GEEK CODE BLOCK----- ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From emhn at telcel.net.ve Fri Feb 1 22:52:33 2002 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Aug 4 23:59:28 2004 Subject: =?ISO-8859-1?Q?M=E1s_en_lo_de_leer_N_l=EDneas_y_unirlas?= =?ISO-8859-1?Q?=2E?= Message-ID: Mant?ngase alejado de los ni?os peque?os. No maneje maquinaria pesada mientras lee esto. Use un s?lo ojo para mirarlo y luego abra el otro _lentamente_. "Quiero leer mi archivo en grupos de N l?neas y combinarlas en una sola. Adem?s tengo mucha RAM. Y soy un functional programming freak." $n = 2; while ($_ = join(" ", map { scalar <> || () } 1..$n) ) { my $t = $n - 1; s/\n/ / while ($t--); print; } Modificar $cuantas a placer seg?n se quieran m?s o menos l?neas. Lo mismo para la lectura... usar o la entrada standard redirigida. No funciona leyendo directo de la entrada standard, pero realmente no voy a averig?ar por qu?. (Esto ocurre cuando uno tiene que hacer migraciones de 80Gb durante un perfecto fin de semana). -- Ernesto Hern?ndez-Novich - Running Linux 2.4.17 i686 - Unix: Live free or die! Trouble getting proper answers? RTFM and STFW. Don't like my answers? Keep sending money for faster/longer ones. Don't get it? FOAD. I mean it. Or procmail me to /dev/null (Ask me how!) If you can't apt-get it, it isn't useful or doesn't exist. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From emhn at telcel.net.ve Fri Feb 1 22:58:17 2002 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Aug 4 23:59:28 2004 Subject: =?ISO-8859-1?Q?M=E1s_en_lo_de_leer_N_l=EDneas_y_unirlas?= =?ISO-8859-1?Q?=2E?= In-Reply-To: Message-ID: On Sat, 2 Feb 2002, Ernesto Hernandez-Novich wrote: > Mant?ngase alejado de los ni?os peque?os. No maneje maquinaria pesada > mientras lee esto. Use un s?lo ojo para mirarlo y luego abra el otro > _lentamente_. Randall Schwartz acaba de llamarme imb?cil. my @buffer; my $n = 2; { my $t = $n - 1; push @buffer, scalar ; redo unless eof(IN) or @buffer >= $n; $_ = join " ",@buffer; s/\n/ / while ($t--); print; @buffer = (); redo unless eof(IN); } Conciso y sin brujer?as :-) TIMTOWTDI -- Ernesto Hern?ndez-Novich - Running Linux 2.4.17 i686 - Unix: Live free or die! Trouble getting proper answers? RTFM and STFW. Don't like my answers? Keep sending money for faster/longer ones. Don't get it? FOAD. I mean it. Or procmail me to /dev/null (Ask me how!) If you can't apt-get it, it isn't useful or doesn't exist. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From ctam at worldnet.fr Sat Feb 2 11:32:19 2002 From: ctam at worldnet.fr (=?iso-8859-1?q?Crist=F3bal=20Alvarado=20Minic?=) Date: Wed Aug 4 23:59:28 2004 Subject: Leer dos =?iso-8859-1?q?l=EDneas=20a=20la=20vez?= In-Reply-To: <3C5AFCF1.6060808@net-uno.net> References: <02020121141604.31191@dec47> <3C5AFCF1.6060808@net-uno.net> Message-ID: <02020218321900.03174@dec47> Hola, gracias por las respuestas, Juan Jos?, Jos? Luis y Ernesto (1). La soluci?n de J.J. fue la que apliqu?, funcion? muy bien (y una soluci?n recursiva, aunque solapada, siempre ser? m?s elegante que una iterativa). El Friday 1 February 2002 21:39, escribiste: > Hola Cristobal, > > que te parece esto? > > > while (<>) { > chomp; > $_ .= <>; > print; > } > > Saludos, > > Juan Jose > (1) En orden de aparici?n ;-) -- Crist?bal Alvarado Minic Laboratoire de Physique des Milieux Ionis?s et Applications LPMIA - CNRS 7040 Universit? Henri Poincar? Nancy I - Boulevard des Aiguillettes BP 239 - 54506 Vandoeuvre-l?s-Nancy Cedex - France tel: (33) 03 83 91 21 09 - fax: (33) 03 83 27 34 98 E-mail: ctam@worldnet.fr ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From gdelfino at mac.com Tue Feb 5 09:47:16 2002 From: gdelfino at mac.com (Gustavo Delfino) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve Message-ID: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> Amigos programadores, simplemente quiero invitarlos a visitar el nuevo sitio web http://elhatillo.com.ve Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas CGI desarrollados por nosotros. Utilizamos espec?ficamente los paquetes HTML::Template y DBI con DBD::CSV. Espero que lo disfruten. Y ahora la propaganda generica: Los invito a visitar el nuevo sitio web http://elhatillo.com.ve donde encontrar?n un excelente tour virtual con fotos panor?micas desde todas las calles que a la vez muestra los sitios a cada una de ?stas. Se pueden ver los n?meros telef?nicos de los establecimientos y dejar su opini?n en el libro de visitantes o en cada nodo del tour virtual. Tambi?n encontrar?n informaci?n sobre la historia de El Hatillo, sus s?mbolos patrios (escudo, bandera e himno) y un album de fotos. En el futuro cercano estaremos abriendo la secci?n de foros (tambien en Perl) donde toda la comunidad podr? discutir direfentes asuntos. Atentamente, Gustavo Delfino GD Solutions C.A. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From mendoza at kitiara.org Tue Feb 5 11:00:59 2002 From: mendoza at kitiara.org (Cesar Mendoza) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> Message-ID: <20020205170058.GA22289@tyka.kitiara.com> Hola, Creo que seria un poco mas relevante para nosotros si nos contaras hacerca de la arquitectura del sitio y de como usando perl implementaron esa arquitectura. Bye Cesar Mendoza http://www.kitiara.org -- "If I have seen further it is by standing on the shoulders of giants." --Isaac Newton On Tue, Feb 05, 2002 at 11:47:16AM -0400, Gustavo Delfino wrote: > Amigos programadores, simplemente quiero invitarlos a visitar el nuevo sitio web > http://elhatillo.com.ve > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas CGI > desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > HTML::Template y DBI con DBD::CSV. > > Espero que lo disfruten. > ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From gdelfino at mac.com Tue Feb 5 11:20:28 2002 From: gdelfino at mac.com (Gustavo Delfino) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <20020205170058.GA22289@tyka.kitiara.com> Message-ID: <20020205132029-r01010800-694d27f7-0920-010c@10.142.132.242> Mas detalles? OK, tenemos una base de datos que consta de varios archivos planos de texto separados por comas (CSV). En lugar de accesarlos directamente, lo hacemos utilizando DBI. Esto nos permite utilizar SQL en la base de datos a pesar de que son simples archivos de texto. Al mismo tiempo, en el futuro nos podremos mudar a MySQL o PostregSQL muy facilmente. Tenemos una base de datos para los sitios del hatillo, otra para las panor?micas, otra para las categorias del directorio. Asi por ejemplo, cuado ves una panoramica en particular, se buscan los locales cercanos en otra base de datos automaticamente. El aspecto de las paginas web esta totalmente separado de la programacion gracias al paquete HTML::Template. El sistema de banners es bien sofisticado, ya que se le da preferencia al los banners de los sitios cercanos a cada panoramica. Cualquier otra cosa, estoy a la orden Saludos Gustavo Delfino On 2/5/02 at 11:00 AM, mendoza@kitiara.org (Cesar Mendoza) wrote: > Hola, > > Creo que seria un poco mas relevante para nosotros si nos contaras > hacerca de la arquitectura del sitio y de como usando perl implementaron > esa arquitectura. > > Bye > Cesar Mendoza > http://www.kitiara.org > -- > "If I have seen further it is by standing on the shoulders of giants." > --Isaac Newton > > On Tue, Feb 05, 2002 at 11:47:16AM -0400, Gustavo Delfino wrote: > > Amigos programadores, simplemente quiero invitarlos a visitar el nuevo sitio > web > > http://elhatillo.com.ve > > > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas CGI > > desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > > HTML::Template y DBI con DBD::CSV. > > > > Espero que lo disfruten. > > > > ------------------------------------------------------------------------ > Enviar e-mail a colocando en el cuerpo: > "UNSUBSCRIBE caracas-pm-list" para desuscribirse. > "INFO caracas-pm-list" para conocer las reglas de etiqueta. > ------------------------------------------------------------------------ ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From cmolina at net-uno.net Tue Feb 5 12:09:58 2002 From: cmolina at net-uno.net (Carlos Molina) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <20020205170058.GA22289@tyka.kitiara.com> References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> <20020205170058.GA22289@tyka.kitiara.com> Message-ID: <02020514095800.06459@cmolina> En Tuesday 05 February 2002 13:00, me escribistes...: > Hola, > > Creo que seria un poco mas relevante para nosotros si nos contaras > hacerca de la arquitectura del sitio y de como usando perl implementaron > esa arquitectura. > Estoy de acuerdo con Cesar... Por ejemplo, porque usastes CSV en vez de una RDB...?? Saludos. > Bye > Cesar Mendoza > http://www.kitiara.org > -- > "If I have seen further it is by standing on the shoulders of giants." > --Isaac Newton > > On Tue, Feb 05, 2002 at 11:47:16AM -0400, Gustavo Delfino wrote: > > Amigos programadores, simplemente quiero invitarlos a visitar el nuevo > > sitio web http://elhatillo.com.ve > > > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas > > CGI desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > > HTML::Template y DBI con DBD::CSV. > > > > Espero que lo disfruten. > > ------------------------------------------------------------------------ > Enviar e-mail a colocando en el cuerpo: > "UNSUBSCRIBE caracas-pm-list" para desuscribirse. > "INFO caracas-pm-list" para conocer las reglas de etiqueta. > ------------------------------------------------------------------------ -- ========================= Carlos A. Molina G Network & UNIX System Administrator NetUno NOC cmolina@net-uno.net ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From gdelfino at mac.com Tue Feb 5 16:23:04 2002 From: gdelfino at mac.com (Gustavo Delfino) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <02020514095800.06459@cmolina> Message-ID: <20020205182306-r01010800-84d343f3-0920-010c@10.142.132.242> On 2/5/02 at 2:09 PM, cmolina@net-uno.net (Carlos Molina) wrote: > En Tuesday 05 February 2002 13:00, me escribistes...: > > Hola, > > > > Creo que seria un poco mas relevante para nosotros si nos contaras > > hacerca de la arquitectura del sitio y de como usando perl implementaron > > esa arquitectura. > > > > Estoy de acuerdo con Cesar... > Por ejemplo, porque usastes CSV en vez de una RDB...?? > > Saludos. CSV utilizado desde DBI es una RDB. Claro que es la mas rudimentaria de las RDB, pero mientras nuestro tr?fico sea bajo, esta mas que bien. La base de datos esta en CSV ya que esto nos permite modificarla directamente con un editor de texto. Esto es importante ya que aun no hemos escrito un programa para para modificar la base de datos. Una vez que tengamos escrito este programa, entonces estaremos listos para usar una base de datos mejor como por ejm MySQL. Saludos, Gustavo A. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From koshrf at cantv.net Tue Feb 5 18:06:47 2002 From: koshrf at cantv.net (=?iso-8859-1?Q?Ricardo_C._Fern=E1ndez_de_C.?=) Date: Wed Aug 4 23:59:28 2004 Subject: Nuevo sitio elhatillo.com.ve References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> Message-ID: <047c01c1aea2$2f1f4d00$0a00000a@fercusoft.home> The page cannot be displayed c'ya! ----- Original Message ----- From: "Gustavo Delfino" To: "Perl Mongers Caracas" Sent: Tuesday, February 05, 2002 11:47 AM Subject: Nuevo sitio elhatillo.com.ve > Amigos programadores, simplemente quiero invitarlos a visitar el nuevo sitio web > http://elhatillo.com.ve > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas CGI > desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > HTML::Template y DBI con DBD::CSV. > > Espero que lo disfruten. > > Y ahora la propaganda generica: > > Los invito a visitar el nuevo sitio web http://elhatillo.com.ve donde > encontrar?n un excelente tour virtual con fotos panor?micas desde todas > las calles que a la vez muestra los sitios a cada una de ?stas. Se > pueden ver los n?meros telef?nicos de los establecimientos y dejar su > opini?n en el libro de visitantes o en cada nodo del tour virtual. > > Tambi?n encontrar?n informaci?n sobre la historia de El Hatillo, sus s?mbolos > patrios (escudo, bandera e himno) y un album de fotos. > > En el futuro cercano estaremos abriendo la secci?n de foros (tambien en > Perl) donde toda la comunidad podr? discutir direfentes asuntos. > > Atentamente, > > Gustavo Delfino > GD Solutions C.A. > ------------------------------------------------------------------------ > Enviar e-mail a colocando en el cuerpo: > "UNSUBSCRIBE caracas-pm-list" para desuscribirse. > "INFO caracas-pm-list" para conocer las reglas de etiqueta. > ------------------------------------------------------------------------ ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From dandel at etheron.net Tue Feb 5 18:20:50 2002 From: dandel at etheron.net (Cesar Villanueva) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <047c01c1aea2$2f1f4d00$0a00000a@fercusoft.home> References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> <047c01c1aea2$2f1f4d00$0a00000a@fercusoft.home> Message-ID: <200202060034.g160Y0E25459@rs8s1.datacenter.cha.cantv.net> El Mar 05 Feb 2002 20:06, Ricardo C. Fern?ndez de C. escribi?: > The page cannot be displayed > c'ya! I could dysplay it (Konqueror) but.... > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas > > CGI > > > desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > > HTML::Template y DBI con DBD::CSV. Me parece que todo el mail es una descarada y mentirosa propaganda. ?Full de programas CGI? Lo ?nico que fue Javascript (full) y !archivos mov! ?Pucha! -- C?sar Villanueva SuSE Linux C.A. "First they ignore you. Then they laugh at you. Then they fight you. Then you win." [Gandhi] ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From naterajj at telcel.net.ve Tue Feb 5 19:30:06 2002 From: naterajj at telcel.net.ve (Juan Jose Natera Abreu) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> <047c01c1aea2$2f1f4d00$0a00000a@fercusoft.home> <200202060034.g160Y0E25459@rs8s1.datacenter.cha.cantv.net> Message-ID: <3C60871E.6090106@telcel.net.ve> Hola, > Me parece que todo el mail es una descarada y mentirosa propaganda. ?Full de > programas CGI? Lo ?nico que fue Javascript (full) y !archivos mov! > > ?Pucha! Bueno, las paginas son shtml, podria tener SSI, lo que yo si veo es que usaron dreamweaver en vez de vim... Saludos, Juan Jose ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From gdelfino at mac.com Wed Feb 6 07:40:20 2002 From: gdelfino at mac.com (Gustavo Delfino) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <200202060034.g160Y0E25459@rs8s1.datacenter.cha.cantv.net> Message-ID: <20020206094022-r01010800-a889d418-0920-010c@10.142.132.242> On 2/5/02 at 8:20 PM, dandel@etheron.net (Cesar Villanueva) wrote: > I could dysplay it (Konqueror) but.... > Lamentablemente, Apple no ha sacado quicktime para unix por lo que desde Konqueror no se pueden ver las panor?micas. Si la p?gina resulta popular, podemos hacer uso de unos javascripts que permiter ver panor?micas aunque no tengas instalado QuickTime, lo cual es ideal para los visitantes de Unix/Linux. > > > Y eso que tiene que ver con Perl? Bueno, la p?gina esta full de programas > > > > CGI > > > > > desarrollados por nosotros. Utilizamos espec?ficamente los paquetes > > > HTML::Template y DBI con DBD::CSV. > > Me parece que todo el mail es una descarada y mentirosa propaganda. ?Full de > programas CGI? Lo ?nico que fue Javascript (full) y !archivos mov! > > ?Pucha! > > > -- > C?sar Villanueva > SuSE Linux C.A. > "First they ignore you. Then they laugh at you. > Then they fight you. Then you win." [Gandhi] Todos los CGIs son 100% en Perl: El album de fotos es un programa CGI desarrollado por nosotros. El sistema de banners son varios CGIs desarrollados por nosotros. El libro de visitantes es otro CGI, pero no desarrollado por nosotros. Cuando a?ades un comentario a una panor?mica, estas corriendo un CGI hecho por nosotros. Por cierto que tengo aqui que acomodar un problema con los acentos. El directorio es otro programa CGI hecho 100% por nosotros, actualmente corre en 4 modos distintos: http://elhatillo.com.ve/cgi-bin/directory.cgi?order=alphabetically&lang=es http://elhatillo.com.ve/cgi-bin/directory.cgi?order=alphabetically&lang=en http://elhatillo.com.ve/cgi-bin/directory.cgi?order=categorically&lang=es http://elhatillo.com.ve/cgi-bin/directory.cgi?order=categorically&lang=es Y el m?s importante es el cgi para mostrar las panor?micas. Puede ser llamado de tres modos: 1) Cuando haces click en uno de los puntos del mapa principal, como por ejemplo: http://www.elhatillo.com.ve/cgi-bin/peace.cgi?to=HAT_HI20&lang=es Se muestra la panoramica con su vista por defecto. 2) Cuando cuando pasas desde una panoramica a otra: http://www.elhatillo.com.ve/cgi-bin/peace.cgi?to=HAT_I20&from=HAT_HI20&hotspot=2&lang=es Entonces se muestra la nueva panor?mica preservando la direcci?n del movimiento (como si estubieras caminando). 3) Cuando es llamado desde una estrella roja en el directorio: http://www.elhatillo.com.ve/cgi-bin/peace.cgi?to=HAT_E30&fov=50.6&pan=336.6&tilt=14.1&lang=es Entonces aparece la panoramica apuntando hacia la fachada del sitio en cuestion. Lo de mentirosa propaganda la verdad es que no lo entiendo. Propaganda si, pero porque mentirosa? On 2/5/02 at 9:30 PM, naterajj@telcel.net.ve (Juan Jose Natera Abreu) wrote: > Bueno, las paginas son shtml, podria tener SSI, lo que yo si veo es que > usaron dreamweaver en vez de vim... > > Saludos, > > Juan Jose La parte de "VALORES" son paginas est?ticas hechas con DreamWeaver. El resto fue hecho a mano con XEMacs (desde Mac OS X) y BBEdit. VIM lo tengo instalado, pero no lo uso. Uds. lo que lanzan es plomo.. Atentamente, Gustavo Delfino ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From dandel at etheron.net Wed Feb 6 08:01:51 2002 From: dandel at etheron.net (Cesar Villanueva) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <20020206094022-r01010800-a889d418-0920-010c@10.142.132.242> References: <20020206094022-r01010800-a889d418-0920-010c@10.142.132.242> Message-ID: <200202061401.g16E1t323726@rs4s1.datacenter.cha.cantv.net> El Mi? 06 Feb 2002 09:40, Gustavo Delfino escribi?: > Uds. lo que lanzan es plomo.. Es posible, pero f?jate que el asunto de la lista es Perl. Suponiendo que los CGI sean hechos en Perl (no nos consta) no significa que la lista est? para "anunciar" algo hecho en Perl si no viene acompa?ado un "aprendizaje". Esto es, si "aprendo" (en mi caso) o "aprecio" (en el caso de un Perl-gur?) tu c?digo, se cumple el objetivo de la lista (y hasta podr?a mejorar tu c?digo) o llegar?as a hacer una p?gina _para todo el mundo_ (no s?lo para los que usen Windows o Macintosh). Pi?nsatelo... -- C?sar Villanueva "First they ignore you. Then they laugh at you. Then they fight you. Then you win." [Gandhi] ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From gdelfino at mac.com Wed Feb 6 08:58:35 2002 From: gdelfino at mac.com (Gustavo Delfino) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve In-Reply-To: <200202061401.g16E1t323726@rs4s1.datacenter.cha.cantv.net> Message-ID: <20020206105838-r01010800-952af846-0920-010c@10.142.132.242> On 2/6/02 at 10:01 AM, dandel@etheron.net (Cesar Villanueva) wrote: > El Mi? 06 Feb 2002 09:40, Gustavo Delfino escribi?: > > Uds. lo que lanzan es plomo.. > > Es posible, pero f?jate que el asunto de la lista es Perl. Suponiendo que los > CGI sean hechos en Perl (no nos consta) no significa que la lista est? para > "anunciar" algo hecho en Perl si no viene acompa?ado un "aprendizaje". Esto > es, si "aprendo" (en mi caso) o "aprecio" (en el caso de un Perl-gur?) tu > c?digo, se cumple el objetivo de la lista (y hasta podr?a mejorar tu c?digo) > o llegar?as a hacer una p?gina _para todo el mundo_ (no s?lo para los que > usen Windows o Macintosh). > > Pi?nsatelo... > > -- > C?sar Villanueva > "First they ignore you. Then they laugh at you. > Then they fight you. Then you win." [Gandhi] OK, perdonen, pero creo que se puede ser un poco mas flexible tomando en cuenta que esta es una lista de Perl espec?fica para Caracas. En mi caso, casi siempre que tengo una pregunto de Perl, prefiero hacerla en otro sitio m?s apropiado. Por ejemplo, no he podido hacer que dbish funcione con DBD::CSV, pero esto es m?s apropiado para la lista DBI que para aca. De igual forma, otras veces t?rmino preguntando en comp.lang.perl. De mi c?digo no creo que hay mucho que aprender ya que todo viene de los libros y sin inventar mucho. Lo que si hay que aprender es a escoger y a leer los libros. En particular para el desarrollo de este sitio utilizamos: Perl Cookbook (O'Reilly) CGI Programming with Perl (O'Reilly) Programming the Perl DBI (O'Reilly) CGI.pm (Wiley) y los de siempre El Camello y la Llama Tambien, en mi opinion es una informacion valiosa cuando comparto con Uds. las tecnologias que estamos utilizando para hacer que la pagina funcione, ya que eso si es dificil: escoger el tipo de base de datos, usar Mason o HTML::Template, etc. En resumen, yo creo que en esta lista tambien se deber?a permitir discutir como Perl ayuda a resolver problemas de nuestra comunidad aunque no sea a un nivel tan t?cnico. Atentamente, Gustavo Delfino ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From emhn at telcel.net.ve Wed Feb 6 09:59:32 2002 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Aug 4 23:59:29 2004 Subject: Dialer con =?ISO-8859-1?Q?generaci=F3n?= de DTMF In-Reply-To: <3C60CBB8.3070903@cantv.net> Message-ID: On Wed, 6 Feb 2002, Carlos Guilarte wrote: > Como tal el modem puede generar el c?digo DTMF, y con hacer un software > que envie comandos AT al modem ya tienes... > por ejemplo prueba con minicom : > >ATDT 04145555555 > si el altavoz del modem esta encendido escucharas el tono de marcar y > los tonos DTMF. El problema de Alfredo es enviar tonos DTMF _despu?s_ de haber establecido una conexi?n. Una vez que estableciste la conexi?n (que debe ser de _voz_, no sirve datos ni fax), no tienes acceso a ATDT. Se requiere generar los tonos adecuados (que a modo de informaci?n, cada "tono" es en realidad un par de tonos con frecuencias particulares seleccionadas para que la interferencia sea imperceptible) desde _software_; bien sea porque tienes un generador de tonos (3l33t h4x0r) o porque los tienes pre-grabados en archivos de sonido. A?n as?, te resta el problema de enviar un archivo de _audio_ para que sea _reproducido_ por el modem. Los modems con capacidad de voz permiten enviar un archivo de audio en un formato espec?fico para cada modem, de modo que ?ste lo reproduzca sobre la l?nea [1]; no son archivos WAV, AU, AIFF, VOC, ni _ninguno_ de los formatos habituales que uno encuentra con sox. De modo que tu problema se reduce a tener los tonos pregrabados en el formato que requiere tu modem, y reproducirlos cuando haga falta durante la llamada. Alfredo, puedes comenzar por usar vgetty [2]. Este es un getty especializado para modems de voz que te va a proveer, entre otras cosas, una aplicaci?n de nombre vm que permite controlar la reproducci?n de archivos de audio hacia el modem y desde el modem (si, puedes recibir llamadas de voz, capturarla y guardarla en tu disco duro). Forma parte de la distribuci?n de mgetty+sendfax apt-get install mgetty mgetty-pvftools mgetty-voice Ahora bien, _nunca_ me ver?as haciendo un script de shell que emplee vm. Estamos en el siglo 21, existe Perl y Modem::Vgetty que hace _exactamente_ lo que te imaginas en 10 l?neas... #!/usr/bin/perl # hack.pl use Modem::Vgetty; my $p = "800-TOLKIEN"; my $m = "frodowashere.rmd"; my $v = new Modem::Vgetty; $v->device('DIALUP_LINE'); $v->add_handler('BUSY_TONE', 'finish', sub { $v->stop; exit 0; }); $v->enable_events; $v->dial($p); $v->waitfor('READY'); $v->play_and_wait($m); Prepara el dispositivo, agrego un callback en caso de que la l?nea est? ocupada, activo el manejo de eventos de vgetty, marco, espero que el _modem_ me indique que se estableci? la comunicaci?n de voz y luego reproduce el sonido. Si, es un ejemplo unidireccional; no, no voy a poner un ejemplo bidireccional porque la documentaci?n del m?dulo es extensa al respecto; si est?s navegando un men?, evidentemente te har? falta esperar tonos de control y bla bla bla. Es muy f?cil. frodowashere.rmd es un archivo de _audio_ que contiene una grabaci?n de voz en el formato particular del modem de voz, y fue capturada utilizado el comando vm (y un micr?fono conectado al _modem_). vm record -l ttyS0 -m frodowashere.rmd y para ponerlo todo junto vm shell -l ttyS0 -S hack.pl ?C?mo? ?Qu? quieres hacer el voice-mail? Modem::VBox > Alfredo Rahn wrote: > > Saludos gente! > > > > Tengo el siguiente escenario: un cliete mio utiliza el servicio de > > Secretaria Virtual de Telcel para enviar correspondencia de voz a sus > > clientes y proveedores, y refiere molesto el proceso de marcar los > > numeros celulares de todos ellos cada vez... asi que requiere de un > > software que le permita discar hacia dicho sistema, navegar hasta la > > opci?n de envio de mensajes, marque usando DTMF los numeros > > correspondientes (hasta 200 por vez), y luego, de ser posible, > > reproduzca el mensaje de voz (tal vez almacenado en un archivo .wav o > > ..mp3) hacia el modem. Puedes hacer una m?quina de estados para el env?o de los tonos (es elegante y simple de modificar) o lo puedes programar con ifses (que funciona, claro, pero te complica implementar otros flujos de tonos). Puedes sintetizar el mensaje desde "texto" utilizando festival, apt-get install festival festvox-ellpc11k festvox-kdlpc8k (voces masculinas en espa?ol e ingl?s, respectivamente) Puedes preparar los mensajes en cualquier computador y los grabas en .wav, para luego pasarlo a .rmd puedes usar los comandos de conversi?n que incluye vgetty. Siendo inteligente, grabas los mensajes en mono, 8000, 8 bits y luego los conviertes. > > Tiene instalado un modem Us-Robotics Sportster interno con voz, y este > > esta conectado a sendo Motorola FX-2000 (estacion celular base). Ese modem funciona con vgetty. Actualiza el firmware a la ?ltima versi?n disponible. [1] Ciertamente, tambi?n se puede conectar la l?nea de salida de la tarjeta de sonido hacia el micr?fono del modem, pero el audio que se reproduzca debe estar a 8000 u-Law mono, caso contrario el ruido y la distorsi?n son importantes. -- Ernesto Hern?ndez-Novich - Running Linux 2.4.17 i686 - Unix: Live free or die! Trouble getting proper answers? RTFM and STFW. Don't like my answers? Keep sending money for faster/longer ones. Don't get it? FOAD. I mean it. Or procmail me to /dev/null (Ask me how!) If you can't apt-get it, it isn't useful or doesn't exist. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From koshrf at cantv.net Wed Feb 6 16:22:30 2002 From: koshrf at cantv.net (=?iso-8859-1?Q?Ricardo_C._Fern=E1ndez_de_C.?=) Date: Wed Aug 4 23:59:29 2004 Subject: Nuevo sitio elhatillo.com.ve References: <20020205114718-r01010800-2052dc93-0920-010c@10.142.132.242> <047c01c1aea2$2f1f4d00$0a00000a@fercusoft.home> <200202060034.g160Y0E25459@rs8s1.datacenter.cha.cantv.net> <3C60871E.6090106@telcel.net.ve> Message-ID: <051601c1af5c$c7d40ee0$0a00000a@fercusoft.home> Si les interesa saber, nunca he visto la p?gina desde mi ABA. que lastima (i doesnt care anyway) c'ya! ----- Original Message ----- From: "Juan Jose Natera Abreu" To: Sent: Tuesday, February 05, 2002 9:30 PM Subject: Re: Nuevo sitio elhatillo.com.ve > Hola, > > > > > Me parece que todo el mail es una descarada y mentirosa propaganda. ?Full de > > programas CGI? Lo ?nico que fue Javascript (full) y !archivos mov! > > > > ?Pucha! > > > Bueno, las paginas son shtml, podria tener SSI, lo que yo si veo es que > usaron dreamweaver en vez de vim... > > Saludos, > > Juan Jose > > > > > > ------------------------------------------------------------------------ > Enviar e-mail a colocando en el cuerpo: > "UNSUBSCRIBE caracas-pm-list" para desuscribirse. > "INFO caracas-pm-list" para conocer las reglas de etiqueta. > ------------------------------------------------------------------------ ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------ From emhn at telcel.net.ve Wed Feb 27 13:14:39 2002 From: emhn at telcel.net.ve (Ernesto Hernandez-Novich) Date: Wed Aug 4 23:59:29 2004 Subject: [P] =?iso-8859-15?q?=BFcapturador=20de=20sesi=F3n=20para=20modo?= consola? In-Reply-To: <200202271755.g1RHtEr15678@rs4s1.datacenter.cha.cantv.net> Message-ID: On Wed, 27 Feb 2002, David Alvarado wrote: > Les escribo esta vez para preguntarles lo que ya anuncia el subject: > ?existe alg?n capturador de pantalla en para la consola? > De antemano gracias nuevamente. Si eres root (o el due?o), puedes ver lo que est? presentado en cualquiera de las c?nsolas virtuales haciendo un simple cat /dev/vcsN sustituyendo N por el n?mero de la c?nsola que te interesa. Cualquiera que haga el experimento se dar? cuenta que no existe nada como "retorno del carro" o "saltos de l?nea", ni colores, y es obvio porque lo que se muestra son los caracteres que est?n en la _pantalla_ sin sus atributos. Pero para apaciguar a los nativos (para c?nsolas de 80 columnas, como se evidencia del c?digo). perl -ne '$g="."x80;s/($g)/$1\n/g;print' /dev/vcs1 -- Ernesto Hern?ndez-Novich - Running Linux 2.4.17 i686 - Unix: Live free or die! Geek by nature, Linux by choice, Debian of course. If you can't apt-get it, it isn't useful or doesn't exist. ------------------------------------------------------------------------ Enviar e-mail a colocando en el cuerpo: "UNSUBSCRIBE caracas-pm-list" para desuscribirse. "INFO caracas-pm-list" para conocer las reglas de etiqueta. ------------------------------------------------------------------------