From pmpoa em galvao.eti.br Wed Jun 21 12:14:35 2006 From: pmpoa em galvao.eti.br (=?ISO-8859-1?Q?=22Er_Galv=E3o_Abbott_-_PortoAlegre=2Epm=22?=) Date: Wed, 21 Jun 2006 16:14:35 -0300 Subject: [PortoAlegre-pm] =?iso-8859-1?q?Sa=EDda?= Message-ID: <44999A9B.4000603@galvao.eti.br> Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060621/0d4fb694/attachment.html From ptfzs em yahoo.com.br Wed Jun 21 16:59:26 2006 From: ptfzs em yahoo.com.br (Patty Silva) Date: Wed, 21 Jun 2006 20:59:26 -0300 (ART) Subject: [PortoAlegre-pm] Split In-Reply-To: <4498C5FC.3050107@clavis.com.br> Message-ID: <20060621235926.71358.qmail@web31315.mail.mud.yahoo.com> Pessoal.. estou lendo um arquivo linha por linha e os dados entre as linhas estao separados por espaco.. so que no fim da linha possue caracteres como: / //// ///// ///// / //// //// ///// / = estou fazendo assim: my @file_ok = grep{$_ =~ m/^teste/} @files; for my $file (@file_ok) { open (File, "$diretorio/$file") or die $!; while (my $line = ) { @F = split(/ /,$line); } close File; } Agora para eliminar esses caracteres do final antes de inserir no array :: alguem sabe como?? Outra questao eh.. as vezes tenho linhas que um elemento possui 2 espacoes entre eles :/ .. dai fica dificil neh??? :) Obrigada Paty --------------------------------- Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060621/69694b12/attachment.html From ptfzs em yahoo.com.br Wed Jun 21 17:09:27 2006 From: ptfzs em yahoo.com.br (Patty Silva) Date: Wed, 21 Jun 2006 21:09:27 -0300 (ART) Subject: [PortoAlegre-pm] [Cascavel-pm] Split In-Reply-To: <20060621235926.71358.qmail@web31315.mail.mud.yahoo.com> Message-ID: <20060622000927.17288.qmail@web31310.mail.mud.yahoo.com> Pessoal.. Resolvido o Problema my @teste = grep /[a-zA-Z0-9_]/, em F; usei um grep ai.. nao sei se eh a melhor opcao mais funcionou!! :) Patty Silva escreveu: Pessoal.. estou lendo um arquivo linha por linha e os dados entre as linhas estao separados por espaco.. so que no fim da linha possue caracteres como: / //// ///// ///// / //// //// ///// / = estou fazendo assim: my @file_ok = grep{$_ =~ m/^teste/} @files; for my $file (@file_ok) { open (File, "$diretorio/$file") or die $!; while (my $line = ) { @F = split(/ /,$line); } close File; } Agora para eliminar esses caracteres do final antes de inserir no array :: alguem sabe como?? Outra questao eh.. as vezes tenho linhas que um elemento possui 2 espacoes entre eles :/ .. dai fica dificil neh??? :) Obrigada Paty --------------------------------- Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt_______________________________________________ Cascavel-pm mailing list Cascavel-pm em pm.org http://mail.pm.org/mailman/listinfo/cascavel-pm --------------------------------- Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060621/396a924a/attachment.html From cassandro em gmail.com Wed Jun 21 17:18:55 2006 From: cassandro em gmail.com (Cassandro Davi Emer) Date: Wed, 21 Jun 2006 21:18:55 -0300 Subject: [PortoAlegre-pm] Split In-Reply-To: <20060621235926.71358.qmail@web31315.mail.mud.yahoo.com> References: <4498C5FC.3050107@clavis.com.br> <20060621235926.71358.qmail@web31315.mail.mud.yahoo.com> Message-ID: <8f1a24470606211718x170b1446t7afa3ad8e309256b@mail.gmail.com> Se entendi direito, voce tem arquivos com conteudo assim: *** a.txt inicio *** dasasdasd dsasadsda sdasadsda sda sadsdasdsd / adsasdasdqwe qweqew weqqwewqeqwe //// qwqweeqwqwe qweqweqwewe= qwewqedsaads // qwewq edsaads// *** a.txt fim *** e quer separar as "palavras"... certo? se for, usando isso: *** a.pl inicio *** @F = (); open (File, "a.txt") or die $!; while (my $line = ) { chomp($line); $line =~ s/[\/=]+$// ; push(@F, split(/[ ]+/,$line)); } close File; *** a.pl fim *** deve deixar as palavras isoladas no array... era isso mesmo ou entendi errado? Cassandro Davi Emer cassandro em gmail.com On 6/21/06, Patty Silva wrote: > Pessoal.. estou lendo um arquivo linha por linha > e os dados entre as linhas estao separados por espaco.. so que no fim da > linha possue caracteres como: / //// ///// ///// / //// //// ///// / = > > estou fazendo assim: > > my @file_ok = grep{$_ =~ m/^teste/} @files; > for my $file (@file_ok) > { > open (File, "$diretorio/$file") or die $!; > while (my $line = ) > { > @F = split(/ /,$line); > } > close File; > } > > Agora para eliminar esses caracteres do final antes de inserir no array :: > alguem sabe como?? > > Outra questao eh.. as vezes tenho linhas que um elemento possui 2 espacoes > entre eles :/ .. dai fica dificil neh??? :) > > > Obrigada > > Paty > > > > > > ________________________________ > Yahoo! Search > Música para ver e ouvir: You're Beautiful, do James Blunt > > > _______________________________________________ > PortoAlegre-pm mailing list > PortoAlegre-pm em pm.org > http://mail.pm.org/mailman/listinfo/portoalegre-pm > > From ptfzs em yahoo.com.br Thu Jun 22 15:47:34 2006 From: ptfzs em yahoo.com.br (Patty Silva) Date: Thu, 22 Jun 2006 19:47:34 -0300 (ART) Subject: [PortoAlegre-pm] Format Perl Message-ID: <20060622224734.4317.qmail@web31302.mail.mud.yahoo.com> Pessoal.. estou utilizando a opcao de formatacao no perl.. estou usando da seguinte forma: Formato de Saida --------------------------- format_name OUT "MyBody"; format_top_name OUT "MyTop"; onde: format MyTop = @>>>>>>>>>>>>>>>>>> $ano @>>>>>>>>>>>>>>>>>> $mes @>>>>>>>>>>>>>>>>>> $dia @>>>>>>>>>>>>>>>>>> $hora @>>>>>>>>>>>>>>>>>> $min . format MyBody= @>>>>>> $teste1 @>>>> $teste2 @>>>> $teste3 . e quando eu faco write(OUT) <-- meu arquivo de saida ele me grava essas 2 opcoes.. agora quero criar + 2 tipos de formatacao que seja independente dessa ou seja, depois do write(OUT) alguem pode me ajudar?? Obrigada --------------------------------- Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060622/b906d746/attachment.html From ptfzs em yahoo.com.br Fri Jun 23 05:43:47 2006 From: ptfzs em yahoo.com.br (Patty Silva) Date: Fri, 23 Jun 2006 09:43:47 -0300 (ART) Subject: [PortoAlegre-pm] duvida array - Splice Message-ID: <20060623124347.68638.qmail@web31308.mail.mud.yahoo.com> Pessoal.. estava dando uma estudada no comando splice e verifiquei que ele substitui elementos de uma array eliminando o elemnto a ser substituido..... O problema é: eu nao quero eliminar.. eu quero inserir elementos no meu array.. ex: @array=(1,"c",3,4,"d",5,7); quero inserir 300 na posicao 4, ficando o array 1,c,3,4,300,d,5,7 sem apagar o elemento :) Tem como?? Obrigada obs: outra duvida eh...em um array mudar de posicao alguns elementos!! tem como?? ex @array=(1,"c",3,4,"d",5,7); trocar o elemento 3 pelo elemento 4 Obrigada --------------------------------- Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060623/48a00abb/attachment.html From cassandro em gmail.com Fri Jun 23 08:10:41 2006 From: cassandro em gmail.com (Cassandro Davi Emer) Date: Fri, 23 Jun 2006 12:10:41 -0300 Subject: [PortoAlegre-pm] duvida array - Splice In-Reply-To: <20060623124347.68638.qmail@web31308.mail.mud.yahoo.com> References: <20060623124347.68638.qmail@web31308.mail.mud.yahoo.com> Message-ID: <8f1a24470606230810h51c0032btd3e1bfd42f753e32@mail.gmail.com> Patty, com o proprio splice() tu faz o que voce quer... @array=(1,"c",3,4,"d",5,7); splice(@array, 3, 0, 300); Quanto a trocar os valores, usa uma variavel temporaria mesmo, nao sei se tem algo pra isso. $tmp = $a[1]; $a[1] = $a[2]; $a[2] = $tmp; Cassandro cassandro em gmail.com On 6/23/06, Patty Silva wrote: > Pessoal.. estava dando uma estudada no comando splice e verifiquei que ele > substitui elementos de uma array eliminando o elemnto a ser substituido..... > O problema é: eu nao quero eliminar.. eu quero inserir elementos no meu > array.. > ex: > @array=(1,"c",3,4,"d",5,7); > quero inserir 300 na posicao 4, ficando o array 1,c,3,4,300,d,5,7 sem > apagar o elemento > :) > Tem como?? > > > Obrigada > > obs: outra duvida eh...em um array mudar de posicao alguns elementos!! tem > como?? > ex > @array=(1,"c",3,4,"d",5,7); > trocar o elemento 3 pelo elemento 4 > > Obrigada > > > > > ________________________________ > Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. > Registre seu aparelho agora! > > > _______________________________________________ > PortoAlegre-pm mailing list > PortoAlegre-pm em pm.org > http://mail.pm.org/mailman/listinfo/portoalegre-pm > > From msb.utils em gmail.com Mon Jun 26 09:27:57 2006 From: msb.utils em gmail.com (Mauricio Utils) Date: Mon, 26 Jun 2006 13:27:57 -0300 Subject: [PortoAlegre-pm] =?iso-8859-1?q?Sa=EDda?= In-Reply-To: <44999A9B.4000603@galvao.eti.br> References: <44999A9B.4000603@galvao.eti.br> Message-ID: <60ba62f00606260927r68cdd426ne6126b80963c6073@mail.gmail.com> Graaande Er! Cara, te desejo felicidades nos teus caminhos, e espero que um dia nos encontremos de novo pra bater um papo nerd. ;-) Abraço, Mauricio da Silva Barrios On 6/21/06, "Er Galvão Abbott - PortoAlegre.pm" wrote: > > Caros Monges: > > Comunico que à partir deste momento estou deixando a Sociedade Perl do > Brasil e encerrando qualquer envolvimento organizacional e/ou administrativo > que eu possua com a linguagem. Esta decisão foi tomada depois de muita > reflexão e é definitiva. > > Isso inclui minha participação nas listas Perl-Coordenação, Cascavel-PM e > PortoAlegre-PM, as quais - com exceção da lista de POA por motivos > administrativos - estou cancelando a minha inscrição neste momento. > > O grupo Porto Alegre Perl Mongers, como já era de conhecimento de todos, > passará a ser administrado pelo Igor Sutton Lopes, pessoa na qual deposito > inteira confiança e que tenho certeza de que realizará um trabalho > excelente. O Igor estará tomando posse do cargo oficialmente às 0h00min do > dia 22/06/2006, mas está desde já extra-oficialmente autorizado a responder > pelo grupo. > > Em mais de 5 anos de envolvimento com o grupo PortoAlegre.pm fiz o > possível para alavancar o crescimento da linguagem e o despertar de um maior > interesse da comunidade mundial a respeito de Perl. Foi uma missão difícil, > que tomei para mim em caráter profissional e pessoal, e creio que cumpri > esta missão da melhor forma possível. > > Meus atuais compromissos não me permitem mais disponibilizar tempo e > esforços para dar continuidade à este trabalho. > > Deixo à disposição dos senhores o cargo de Diretor Técnico da SPB. > > Gostaria de agradecer à todos pelo companheirismo, amizade e apoio que > encontrei nos grupos e eventos em que estive envolvido. Foi um privilégio > trabalhar ao lado de vocês. > > Um forte abraço à todos e sucesso, > > Er Galvão Abbott, > > Desligando-se, à partir deste momento, das listas de discussão Cascavel.pme Perl-Coordenação. > > _______________________________________________ > PortoAlegre-pm mailing list > PortoAlegre-pm at pm.org > http://mail.pm.org/mailman/listinfo/portoalegre-pm > > -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060626/7e3c5bb8/attachment.html From msb.utils em gmail.com Mon Jun 26 09:39:26 2006 From: msb.utils em gmail.com (Mauricio Utils) Date: Mon, 26 Jun 2006 13:39:26 -0300 Subject: [PortoAlegre-pm] duvida array - Splice In-Reply-To: <8f1a24470606230810h51c0032btd3e1bfd42f753e32@mail.gmail.com> References: <20060623124347.68638.qmail@web31308.mail.mud.yahoo.com> <8f1a24470606230810h51c0032btd3e1bfd42f753e32@mail.gmail.com> Message-ID: <60ba62f00606260939x6710dbd3hb26f2d61db2d8e47@mail.gmail.com> Pra trocar os valores dá pra atribuir uma lista a outra: ($a[2], $a[3]) = ($a[3], $a[2]); Mauricio On 6/23/06, Cassandro Davi Emer wrote: > > Patty, com o proprio splice() tu faz o que voce quer... > > @array=(1,"c",3,4,"d",5,7); > splice(@array, 3, 0, 300); > > Quanto a trocar os valores, usa uma variavel temporaria mesmo, nao sei > se tem algo pra isso. > $tmp = $a[1]; $a[1] = $a[2]; $a[2] = $tmp; > > Cassandro > cassandro at gmail.com > > On 6/23/06, Patty Silva wrote: > > Pessoal.. estava dando uma estudada no comando splice e verifiquei que > ele > > substitui elementos de uma array eliminando o elemnto a ser > substituido..... > > O problema é: eu nao quero eliminar.. eu quero inserir elementos no meu > > array.. > > ex: > > @array=(1,"c",3,4,"d",5,7); > > quero inserir 300 na posicao 4, ficando o array 1,c,3,4,300,d,5,7 sem > > apagar o elemento > > :) > > Tem como?? > > > > > > Obrigada > > > > obs: outra duvida eh...em um array mudar de posicao alguns elementos!! > tem > > como?? > > ex > > @array=(1,"c",3,4,"d",5,7); > > trocar o elemento 3 pelo elemento 4 > > > > Obrigada > > > > > > > > > > ________________________________ > > Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu > celular. > > Registre seu aparelho agora! > > > > > > _______________________________________________ > > PortoAlegre-pm mailing list > > PortoAlegre-pm at pm.org > > http://mail.pm.org/mailman/listinfo/portoalegre-pm > > > > > _______________________________________________ > PortoAlegre-pm mailing list > PortoAlegre-pm at pm.org > http://mail.pm.org/mailman/listinfo/portoalegre-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/portoalegre-pm/attachments/20060626/a3e3bbd4/attachment.html