From leoberbert em uol.com.br Tue Jul 8 06:01:11 2014 From: leoberbert em uol.com.br (Leonardo Berbert Gomes) Date: Tue, 08 Jul 2014 10:01:11 -0300 Subject: [Cascavel-pm] Ajuda prioridade if Message-ID: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> Um anexo em HTML foi limpo... URL: From blabos em gmail.com Tue Jul 8 06:17:43 2014 From: blabos em gmail.com (Blabos de Blebe) Date: Tue, 8 Jul 2014 10:17:43 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> References: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> Message-ID: Experimenta algo como: #!/usr/bin/env perl use strict; use warnings; use File::Slurp; my @lines = read_file('filename'); my %lines; foreach my $line ( @lines ) { if ( $line =~ m/(CRITICO|OK)/ ) { push @{ $lines{ $1 } }, $line; } else { warn 'Linha sem CRITICO ou OK'; } } foreach my $type ( qw{ CRITICO OK } ) { print $_ . $/ foreach @{ $lines{$type} }; } *** Vê se é algo parecido []'s 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes : > Amigos, > > Eu preciso da ajuda de vocês para tirar uma pequena dúvida: > > Eu tenho um arquivo que possui a ocorrência de duas strings. > > OK - Arquivos sendo incrementados normalmente > CRITICO - Arquivos não estão sendo incrementados. > > Como estou usando verificando muitos arquivos ao mesmo tempo, existem a > ocorrência tanto de OK quanto de crítico. > > Agora que vem a dúvida: > > * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre o > OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas > com a ocorrência de critico e não exiba as linhas OK. > * Caso não encontre a ocorrência da string CRITICO, ele exiba a ocorrência > da string OK. > > Alguem tem alguma sugestão? > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From daniel.oliveira.mantovani em gmail.com Tue Jul 8 07:55:01 2014 From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani) Date: Tue, 8 Jul 2014 11:55:01 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: References: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> Message-ID: Leonardo Gomes, você precisa de um de um serviço de messaging. http://www.rabbitmq.com/tutorials/tutorial-five-python.html 2014-07-08 10:17 GMT-03:00 Blabos de Blebe : > Experimenta algo como: > > > #!/usr/bin/env perl > > use strict; > use warnings; > > use File::Slurp; > > my @lines = read_file('filename'); > > my %lines; > > foreach my $line ( @lines ) { > if ( $line =~ m/(CRITICO|OK)/ ) { > push @{ $lines{ $1 } }, $line; > } > else { > warn 'Linha sem CRITICO ou OK'; > } > } > > foreach my $type ( qw{ CRITICO OK } ) { > print $_ . $/ foreach @{ $lines{$type} }; > } > > > *** > > Vê se é algo parecido > > []'s > > > 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes : >> >> Amigos, >> >> Eu preciso da ajuda de vocês para tirar uma pequena dúvida: >> >> Eu tenho um arquivo que possui a ocorrência de duas strings. >> >> OK - Arquivos sendo incrementados normalmente >> CRITICO - Arquivos não estão sendo incrementados. >> >> Como estou usando verificando muitos arquivos ao mesmo tempo, existem a >> ocorrência tanto de OK quanto de crítico. >> >> Agora que vem a dúvida: >> >> * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre o >> OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas com >> a ocorrência de critico e não exiba as linhas OK. >> * Caso não encontre a ocorrência da string CRITICO, ele exiba a ocorrência >> da string OK. >> >> Alguem tem alguma sugestão? >> >> _______________________________________________ >> Cascavel-pm mailing list >> Cascavel-pm em pm.org >> http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm -- -dom -- Daniel de Oliveira Mantovani Business Analytic Specialist Perl Evangelist /Astrophysics hobbyist. +55 11 9 8538-9897 XOXO From glasswalk3r em yahoo.com.br Tue Jul 8 08:11:47 2014 From: glasswalk3r em yahoo.com.br (Alceu Rodrigues de Freitas Junior) Date: Tue, 08 Jul 2014 12:11:47 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: References: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> Message-ID: <53BC0A33.2060401@yahoo.com.br> Aproveitando o ensejo... o que vocês usam para conectar com Perl no RabbitMQ? A alguns meses atrás eu só achei 3 distribuições: - uma estava desatualizada (não conseguia compilar) - a outra dependia de Java (eca) - a outra me obrigava a usar métodos assíncronos Obrigado, Alceu Em 08-07-2014 11:55, Daniel de Oliveira Mantovani escreveu: > Leonardo Gomes, você precisa de um de um serviço de messaging. > http://www.rabbitmq.com/tutorials/tutorial-five-python.html > > > > 2014-07-08 10:17 GMT-03:00 Blabos de Blebe : >> Experimenta algo como: >> >> >> #!/usr/bin/env perl >> >> use strict; >> use warnings; >> >> use File::Slurp; >> >> my @lines = read_file('filename'); >> >> my %lines; >> >> foreach my $line ( @lines ) { >> if ( $line =~ m/(CRITICO|OK)/ ) { >> push @{ $lines{ $1 } }, $line; >> } >> else { >> warn 'Linha sem CRITICO ou OK'; >> } >> } >> >> foreach my $type ( qw{ CRITICO OK } ) { >> print $_ . $/ foreach @{ $lines{$type} }; >> } >> >> >> *** >> >> Vê se é algo parecido >> >> []'s >> >> >> 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes : >>> >>> Amigos, >>> >>> Eu preciso da ajuda de vocês para tirar uma pequena dúvida: >>> >>> Eu tenho um arquivo que possui a ocorrência de duas strings. >>> >>> OK - Arquivos sendo incrementados normalmente >>> CRITICO - Arquivos não estão sendo incrementados. >>> >>> Como estou usando verificando muitos arquivos ao mesmo tempo, existem a >>> ocorrência tanto de OK quanto de crítico. >>> >>> Agora que vem a dúvida: >>> >>> * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre o >>> OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas com >>> a ocorrência de critico e não exiba as linhas OK. >>> * Caso não encontre a ocorrência da string CRITICO, ele exiba a ocorrência >>> da string OK. >>> >>> Alguem tem alguma sugestão? >>> >>> _______________________________________________ >>> Cascavel-pm mailing list >>> Cascavel-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/cascavel-pm >> >> >> >> _______________________________________________ >> Cascavel-pm mailing list >> Cascavel-pm em pm.org >> http://mail.pm.org/mailman/listinfo/cascavel-pm > > > From daniel.oliveira.mantovani em gmail.com Tue Jul 8 08:16:06 2014 From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani) Date: Tue, 8 Jul 2014 12:16:06 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: <53BC0A33.2060401@yahoo.com.br> References: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> <53BC0A33.2060401@yahoo.com.br> Message-ID: Você tem duas possibilidades, a primeira é manter o binding você mesmo ou usar uma das linguagens suportadas pelos core developers. http://www.rabbitmq.com/clients.html 2014-07-08 12:11 GMT-03:00 Alceu Rodrigues de Freitas Junior : > Aproveitando o ensejo... o que vocês usam para conectar com Perl no > RabbitMQ? > > A alguns meses atrás eu só achei 3 distribuições: > > - uma estava desatualizada (não conseguia compilar) > - a outra dependia de Java (eca) > - a outra me obrigava a usar métodos assíncronos > > Obrigado, > > Alceu > > Em 08-07-2014 11:55, Daniel de Oliveira Mantovani escreveu: > >> Leonardo Gomes, você precisa de um de um serviço de messaging. >> http://www.rabbitmq.com/tutorials/tutorial-five-python.html >> >> >> >> 2014-07-08 10:17 GMT-03:00 Blabos de Blebe : >>> >>> Experimenta algo como: >>> >>> >>> #!/usr/bin/env perl >>> >>> use strict; >>> use warnings; >>> >>> use File::Slurp; >>> >>> my @lines = read_file('filename'); >>> >>> my %lines; >>> >>> foreach my $line ( @lines ) { >>> if ( $line =~ m/(CRITICO|OK)/ ) { >>> push @{ $lines{ $1 } }, $line; >>> } >>> else { >>> warn 'Linha sem CRITICO ou OK'; >>> } >>> } >>> >>> foreach my $type ( qw{ CRITICO OK } ) { >>> print $_ . $/ foreach @{ $lines{$type} }; >>> } >>> >>> >>> *** >>> >>> Vê se é algo parecido >>> >>> []'s >>> >>> >>> 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes >>> : >>>> >>>> >>>> Amigos, >>>> >>>> Eu preciso da ajuda de vocês para tirar uma pequena dúvida: >>>> >>>> Eu tenho um arquivo que possui a ocorrência de duas strings. >>>> >>>> OK - Arquivos sendo incrementados normalmente >>>> CRITICO - Arquivos não estão sendo incrementados. >>>> >>>> Como estou usando verificando muitos arquivos ao mesmo tempo, existem a >>>> ocorrência tanto de OK quanto de crítico. >>>> >>>> Agora que vem a dúvida: >>>> >>>> * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre >>>> o >>>> OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas >>>> com >>>> a ocorrência de critico e não exiba as linhas OK. >>>> * Caso não encontre a ocorrência da string CRITICO, ele exiba a >>>> ocorrência >>>> da string OK. >>>> >>>> Alguem tem alguma sugestão? >>>> >>>> _______________________________________________ >>>> Cascavel-pm mailing list >>>> Cascavel-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm >>> >>> >>> >>> >>> _______________________________________________ >>> Cascavel-pm mailing list >>> Cascavel-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/cascavel-pm >> >> >> >> > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm -- -dom -- Daniel de Oliveira Mantovani Business Analytic Specialist Perl Evangelist /Astrophysics hobbyist. +55 11 9 8538-9897 XOXO From leoberbert em uol.com.br Wed Jul 9 10:23:07 2014 From: leoberbert em uol.com.br (Leonardo Berbert Gomes) Date: Wed, 09 Jul 2014 14:23:07 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: CAAxpsiYg2qW4Y3xeN7j5ptGU6NDF5yKe7mc6Oe4aze+VxQqAWw@mail.gmail.com References: 53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mailCAAxpsiYg2qW4Y3xeN7j5ptGU6NDF5yKe7mc6Oe4aze+VxQqAWw@mail.gmail.com Message-ID: <53bd7a7b25508_6756b1d6838201ae@a4-weasel11.mail> Um anexo em HTML foi limpo... URL: From blabos em gmail.com Wed Jul 9 10:34:30 2014 From: blabos em gmail.com (Blabos de Blebe) Date: Wed, 9 Jul 2014 14:34:30 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: <53bd7a7b25508_6756b1d6838201ae@a4-weasel11.mail> References: <53bd7a7b25508_6756b1d6838201ae@a4-weasel11.mail> Message-ID: > Não existe uma outra forma de fazê-lo sem utilizar use File::Slurp? Tem umas 432 formas de fazer sem o File::Slurp. Ele só serve pra ler as linhas do arquivo. Você prefere fazer isso com manualmente? []'s 2014-07-09 14:23 GMT-03:00 Leonardo Berbert Gomes : > Não existe uma outra forma de fazê-lo sem utilizar use File::Slurp? > > > ------------------------------ > > *De:* blabos em gmail.com > *Enviada:* Terça-feira, 8 de Julho de 2014 10:17 > *Para:* cascavel-pm em pm.org > *Assunto:* [Cascavel-pm] Ajuda prioridade if > > Experimenta algo como: > > > #!/usr/bin/env perl > > use strict; > use warnings; > > use File::Slurp; > > my @lines = read_file('filename'); > > my %lines; > > foreach my $line ( @lines ) { > if ( $line =~ m/(CRITICO|OK)/ ) { > push @{ $lines{ $1 } }, $line; > } > else { > warn 'Linha sem CRITICO ou OK'; > } > } > > foreach my $type ( qw{ CRITICO OK } ) { > print $_ . $/ foreach @{ $lines{$type} }; > } > > > *** > > Vê se é algo parecido > > []'s > > > 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes >: > >> Amigos, >> >> Eu preciso da ajuda de vocês para tirar uma pequena dúvida: >> >> Eu tenho um arquivo que possui a ocorrência de duas strings. >> >> OK - Arquivos sendo incrementados normalmente >> CRITICO - Arquivos não estão sendo incrementados. >> >> Como estou usando verificando muitos arquivos ao mesmo tempo, existem a >> ocorrência tanto de OK quanto de crítico. >> >> Agora que vem a dúvida: >> >> * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre >> o OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas >> com a ocorrência de critico e não exiba as linhas OK. >> * Caso não encontre a ocorrência da string CRITICO, ele exiba a >> ocorrência da string OK. >> >> Alguem tem alguma sugestão? >> >> _______________________________________________ >> Cascavel-pm mailing list >> Cascavel-pm em pm.org >> >> http://mail.pm.org/mailman/listinfo/cascavel-pm > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From ricardostock em bol.com.br Thu Jul 10 04:48:20 2014 From: ricardostock em bol.com.br (Ricardo Stock) Date: Thu, 10 Jul 2014 08:48:20 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: <53BC0A33.2060401@yahoo.com.br> References: <53bbeb97dbc24_40911c9c830160fe@a4-weasel17.mail> <53BC0A33.2060401@yahoo.com.br> Message-ID: Ola Alceu, eu vi na pagina de suporte do RabbitMQ tem alguns módulos para Perl. Não sei se vai te ajudar. Mas se poder da uma olhada http://www.rabbitmq.com/devtools.html um abraço -----Mensagem Original----- From: Alceu Rodrigues de Freitas Junior Sent: Tuesday, July 08, 2014 12:11 PM To: cascavel-pm em pm.org Subject: Re: [Cascavel-pm] Ajuda prioridade if Aproveitando o ensejo... o que vocês usam para conectar com Perl no RabbitMQ? A alguns meses atrás eu só achei 3 distribuições: - uma estava desatualizada (não conseguia compilar) - a outra dependia de Java (eca) - a outra me obrigava a usar métodos assíncronos Obrigado, Alceu Em 08-07-2014 11:55, Daniel de Oliveira Mantovani escreveu: > Leonardo Gomes, você precisa de um de um serviço de messaging. > http://www.rabbitmq.com/tutorials/tutorial-five-python.html > > > > 2014-07-08 10:17 GMT-03:00 Blabos de Blebe : >> Experimenta algo como: >> >> >> #!/usr/bin/env perl >> >> use strict; >> use warnings; >> >> use File::Slurp; >> >> my @lines = read_file('filename'); >> >> my %lines; >> >> foreach my $line ( @lines ) { >> if ( $line =~ m/(CRITICO|OK)/ ) { >> push @{ $lines{ $1 } }, $line; >> } >> else { >> warn 'Linha sem CRITICO ou OK'; >> } >> } >> >> foreach my $type ( qw{ CRITICO OK } ) { >> print $_ . $/ foreach @{ $lines{$type} }; >> } >> >> >> *** >> >> Vê se é algo parecido >> >> []'s >> >> >> 2014-07-08 10:01 GMT-03:00 Leonardo Berbert Gomes >> : >>> >>> Amigos, >>> >>> Eu preciso da ajuda de vocês para tirar uma pequena dúvida: >>> >>> Eu tenho um arquivo que possui a ocorrência de duas strings. >>> >>> OK - Arquivos sendo incrementados normalmente >>> CRITICO - Arquivos não estão sendo incrementados. >>> >>> Como estou usando verificando muitos arquivos ao mesmo tempo, existem a >>> ocorrência tanto de OK quanto de crítico. >>> >>> Agora que vem a dúvida: >>> >>> * Eu preciso que a ocorrência da string CRITICO, tenha preferência sobre >>> o >>> OK, tipo se eu tiver a ocorrência da string CRITICO, ele exiba as linhas >>> com >>> a ocorrência de critico e não exiba as linhas OK. >>> * Caso não encontre a ocorrência da string CRITICO, ele exiba a >>> ocorrência >>> da string OK. >>> >>> Alguem tem alguma sugestão? >>> >>> _______________________________________________ >>> Cascavel-pm mailing list >>> Cascavel-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/cascavel-pm >> >> >> >> _______________________________________________ >> Cascavel-pm mailing list >> Cascavel-pm em pm.org >> http://mail.pm.org/mailman/listinfo/cascavel-pm > > > _______________________________________________ Cascavel-pm mailing list Cascavel-pm em pm.org http://mail.pm.org/mailman/listinfo/cascavel-pm From iuridiniz em gmail.com Fri Jul 18 11:15:05 2014 From: iuridiniz em gmail.com (Iuri Diniz) Date: Fri, 18 Jul 2014 15:15:05 -0300 Subject: [Cascavel-pm] Ajuda prioridade if In-Reply-To: <53bd7a7b25508_6756b1d6838201ae@a4-weasel11.mail> References: <53bd7a7b25508_6756b1d6838201ae@a4-weasel11.mail> Message-ID: 2014-07-09 14:23 GMT-03:00 Leonardo Berbert Gomes : > Não existe uma outra forma de fazê-lo sem utilizar use File::Slurp? > lê o arquivo de uma vez só mas ao invés de imprimir direto para a saída, usa dois buffers (uma para a saída) se tem CRITICO põe a linha no buffer de CRITICO, se tem OK, põe a linha no buffer de OK no final vc verifica se o buffer de CRITICO está vazio e exibe o correto (nesse caso o de OK) -- Iuri Diniz -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: