From leprevostfv em gmail.com Tue Oct 15 19:05:14 2013 From: leprevostfv em gmail.com (Felipe da Veiga Leprevost) Date: Tue, 15 Oct 2013 23:05:14 -0300 Subject: [Rio-pm] =?iso-8859-1?q?Falta_1_m=EAs_para_o_YAPC=3A=3ABrasil_201?= =?iso-8859-1?q?3_!?= Message-ID: <1381889114.4521.4.camel@pollux> Caros, Estamos a exatamente 1 mês do YAPC::Brasil (http://yapcbrasil.org.br), estamos aqui em Curitiba todos prontos para recebê-los, e para animá-los um pouco mais estou enviando uma atualização sobre alguns detalhes do evento deste ano: Inscrições Aqueles que ainda não fizeram sua inscrição, pedimos que o façam o quanto antes! Além de servir de garantia para a participação de vocês isso nos ajuda muito na organização e preparo para o número de pessoas que participarão do evento (logística, coffee-break etc.). Portanto, gostaríamos muito que vocês realizem o quanto antes suas inscrições. Lembrando também que o evento possui um desconto especial para estudantes. Link direto para a inscrição: http://yapcbrasil.eventbrite.com/ Logística e Acomodações Ainda é possível encontrar passagens com preços acessíveis, pois Curitiba está em baixa temporada. Aproveitem para planejar suas vindas durante este período. Lembrem-se que a cidade conta com várias opções de hotéis e com preços bem variados. Participantes Conseguimos reunir neste ano várias pessoas do meio acadêmico que trabalham com Perl. É sem dúvida uma oportunidade ímpar para conhecer melhor o trabalho dessas pessoas e procurar novas colaborações. Contamos também com diferentes especialistas em suas áreas de desenvolvimento, alguns já conhecidos de nossas comunidades e listas de e-mails e algumas pessoas diferentes das que convivemos mais, que possuem um contato com Perl de forma diferente daquela que nós, Perl Mongers, estamos habituados. Contaremos também com a participação de dois destaques, o primeiro é Joel Berger; membro bastante ativo do CPAN e Perl blogs e fundador do Perl 4 Science. O Joel trabalha como físico e usa o Perl em sua pesquisa com óptica. O nosso outro convidado estrangeiro é o Gabor Szabo, um dos evangelistas mais conhecidos dentro do mundo Perl, responsável por diversos projetos e com 14 anos de experiência no ensino de Perl. Ambos ficarão durante o evento todo e o Gabor ainda aproveitará para passear por aqui e pelo Rio de Janeiro, portanto é uma grande oportunidade para aproveitarmos a presença dessas pessoas no Brasil. Prêmio YAPC::Brasil 2013 Resolvemos fazer algo diferente neste ano e criamos para esta edição o prêmio YAPC::Brasil 2013. A nossa ideia é poder homenagear uma pessoa que tenha feito a diferença para o Perl de forma nacional, ou seja, uma pessoa que tenha se destacado nacionalmente dentro da comunidade, seja produzido bons materiais para o CPAN, fundando uma empresa destaque baseada na linguagem ou expandindo o alcance da linguagem no país. Não nos prenderemos a algo muito pontual, apenas à influência e destaque no país. A votação se encontra aberta e ocorrerá através do Mobrater, justamente para que todos possamos indicar quem achar que merece ser homenageado, portanto, podem começar a eleger seus candidatos. Site para votação: http://yapcbrasil2013.mobrater.com/ Social Como não pode faltar um bom social, o nosso evento ocorrerá na região mais boêmia da cidade com direito a vários bares e restaurantes, então vamos ter uma boa experiência à base de muita cerveja boa =) Turismo Como podem ter visto no site do YAPC, Curitiba é uma ótima cidade para se visitar, os pontos turísticos estarão todos disponíveis, garantindo boas horas de passeio. Algumas pessoas estão trazendo suas famílias ou namoradas aniversariantes, portanto venham conhecer a cidade também. O YAPC é na sexta e no sábado, o domingo todo fica livre para quem quiser conhecer a cidade. Então é isso pessoal, espero entrar em contato por e-mail com uma frequência um pouco maior até o momento em que o evento ocorrer, espero que todos estejam tão animados como nós com o primeiro YAPC em Curitiba e com tantas atrações diferentes. Qualquer dúvida vocês podem me procurar por e-mail ou algum outro membro da Curitiba Perl Mongers, ajudaremos a todos como for possível. Abraços a todos. http://2013.yapcbrasil.org.br/ -- Felipe da Veiga Leprevost -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Fri Oct 25 07:04:07 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Fri, 25 Oct 2013 12:04:07 -0200 Subject: [Rio-pm] possible rio trip in october In-Reply-To: <86obbw54zq.fsf@red.stonehenge.com> References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Hey Randal we are in October :) On Mon, May 27, 2013 at 9:21 PM, Randal L. Schwartz wrote: > > A friend of mine wants to go to Rio in October (I don't have the exact > dates yet), and if so, I'll be in town for some perlmongering at least > one of the evenings. > > If you'd like, I can even give the talk I'm doing at OSCON this year: > "My half-life with Perl", where I give first-hand accounts of a lot of > the pivotal events in both my life and Perl's life, since we've spent > half my life together. > > And it's too bad FISL conflicts with a cruise that I'm doing. I keep > barely missing it. :) > > -- > Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 > 0095 > > Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc. > See http://methodsandmessages.posterous.com/ for Smalltalk discussion > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 25 09:51:28 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 25 Oct 2013 16:51:28 +0000 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, Message-ID: Ola monges, Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre um tal de Visual Perl (parece que assim que chamam). Parece que seria um modo de desenvolver aplicações visuais em Perl dentro do MS Visual Studio. Não sei se seria na plataforma .NET (o que acharia ridículo, já que no final tudo vira MSIL),ou se usaria as ferramentas do VS para desenvolver a interface gráfica. Bom, fiquei muito curioso. Vocês que são muito mais experientes que eu, sabem de alguma coisa do tipo. Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver para Windows (Ruindows). -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leonardo.balter em gmail.com Fri Oct 25 10:23:54 2013 From: leonardo.balter em gmail.com (Leo Balter) Date: Fri, 25 Oct 2013 15:23:54 -0200 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Me pergunto quem usaria profissionalmente uma mistura de Visual Studio com Perl. São dois mundos diferentes, é meio que fazer crossover de Star Trek com Star Wars, tem quem curte cada um, mas misturar não pode ser pra algo sério. Em 25 de outubro de 2013 14:51, Aureliano Guedes escreveu: > Ola monges, > > Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre > um tal de Visual Perl (parece que assim que chamam). > > Parece que seria um modo de desenvolver aplicações visuais em Perl dentro > do MS Visual Studio. > > Não sei se seria na plataforma .NET (o que acharia ridículo, já que no > final tudo vira MSIL), > ou se usaria as ferramentas do VS para desenvolver a interface gráfica. > > Bom, fiquei muito curioso. > > Vocês que são muito mais experientes que eu, sabem de alguma coisa do tipo. > > Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver > para Windows (Ruindows). > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From dan.vinciguerra em gmail.com Fri Oct 25 10:24:44 2013 From: dan.vinciguerra em gmail.com (Daniel Vinciguerra) Date: Fri, 25 Oct 2013 15:24:44 -0200 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Boa tarde Aureliano, Visual Perl era um projeto da Active State que visava implementar um add-on para o Visual Studio na esperança de possibilitar o desenvolvimento Perl usando o IDE Visual Studio. http://web.archive.org/web/20011107130136/http://www.activestate.com/Products/Visual_Perl/ O projeto foi descontinuado e logo após foi substituído pelo atual ActiveState Komodo IDE¹ que é uma ferramenta multiplataforma baseada na interessante e multiplataforma GUI XUL² da Mozilla. Temos algumas formas de fazer Perl e .Net trabalharem juntas mas não temos um interpretador Perl construído para CLI³. 1 - http://www.activestate.com/komodo-ide 2 - https://developer.mozilla.org/en/docs/XUL 3 - http://en.wikipedia.org/wiki/Common_Language_Infrastructure Abraço, * Daniel Vinciguerra* Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Aureliano Guedes > Ola monges, > > Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre > um tal de Visual Perl (parece que assim que chamam). > > Parece que seria um modo de desenvolver aplicações visuais em Perl dentro > do MS Visual Studio. > > Não sei se seria na plataforma .NET (o que acharia ridículo, já que no > final tudo vira MSIL), > ou se usaria as ferramentas do VS para desenvolver a interface gráfica. > > Bom, fiquei muito curioso. > > Vocês que são muito mais experientes que eu, sabem de alguma coisa do tipo. > > Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver > para Windows (Ruindows). > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From dan.vinciguerra em gmail.com Fri Oct 25 11:31:29 2013 From: dan.vinciguerra em gmail.com (Daniel Vinciguerra) Date: Fri, 25 Oct 2013 16:31:29 -0200 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Leo, Concordo que essa "dobradinha" não é algo comum mas temos hoje o IronPython e IronRuby e são implementações em CLI bem competentes mostrando que isso é possível e viável. Temos hoje também um projeto que visa implementar o Perl 6 em uma virtual machine .Net que é o projeto Niecza. https://github.com/sorear/niecza E a alguns anos fiz uma implementação que integrava um serviço escrito em .Net a um modulo Perl para trabalhar com processamento e informações relacionados a notas fiscais eletrônicas de uma grande empresa de logística nacional. O volume de notas processadas por dia era bem impressionante e o projeto foi bem sério e crítico pois essas informações precisavam ser repassadas para os clientes! Não estou defendendo nem criticando nada... estou lhe dando outro ponto de vista e você tira suas conclusões a partir daqui! ;-) Grande abraço, * Daniel Vinciguerra* Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Daniel Vinciguerra > Boa tarde Aureliano, > > Visual Perl era um projeto da Active State que visava implementar um > add-on para o Visual Studio na esperança de possibilitar o desenvolvimento > Perl usando o IDE Visual Studio. > > > http://web.archive.org/web/20011107130136/http://www.activestate.com/Products/Visual_Perl/ > > > O projeto foi descontinuado e logo após foi substituído pelo atual > ActiveState Komodo IDE¹ que é uma ferramenta multiplataforma baseada na > interessante e multiplataforma GUI XUL² da Mozilla. > > Temos algumas formas de fazer Perl e .Net trabalharem juntas mas não temos > um interpretador Perl construído para CLI³. > > 1 - http://www.activestate.com/komodo-ide > 2 - https://developer.mozilla.org/en/docs/XUL > 3 - http://en.wikipedia.org/wiki/Common_Language_Infrastructure > > Abraço, > > > * > Daniel Vinciguerra* > Web Solutions Architect and Co-Owner at Bivee > http://github.com/dvinciguerra > > > 2013/10/25 Aureliano Guedes > >> Ola monges, >> >> Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre >> um tal de Visual Perl (parece que assim que chamam). >> >> Parece que seria um modo de desenvolver aplicações visuais em Perl dentro >> do MS Visual Studio. >> >> Não sei se seria na plataforma .NET (o que acharia ridículo, já que no >> final tudo vira MSIL), >> ou se usaria as ferramentas do VS para desenvolver a interface gráfica. >> >> Bom, fiquei muito curioso. >> >> Vocês que são muito mais experientes que eu, sabem de alguma coisa do >> tipo. >> >> Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver >> para Windows (Ruindows). >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leonardo.balter em gmail.com Fri Oct 25 11:42:41 2013 From: leonardo.balter em gmail.com (Leo Balter) Date: Fri, 25 Oct 2013 16:42:41 -0200 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Só vejo algumas justificativas para a existência de IronPython e IronRuby: - tentativa de resolver problema de performance e escalabilidade de interpretador Python ou Ruby. Não vejo esse problema com Perl, isso parece melhor solucionado. - Política corporativa. Desenvolvedores frustrados com .NET querem a experiência de outra linguagem e partem para essas linguagens que - atualmente - são mainstream entre as dinâmicas. - Java tem isso, .NET tem que ter igual, vide o C#. - Prova conceitual e de mkt para atrair desenvolvedores Python e Ruby para o uso de estrutura .NET. Acho que devs Perl não caem nessa, é muito "meh", pois não resolve muita coisa em Perl. Não estou criticando um IronPerl/ Visual Perl que seja, mas pra mim é uma combinação que não faz sentido. Tipo suco de laranja e iogurte. :) Em 25 de outubro de 2013 16:31, Daniel Vinciguerra < dan.vinciguerra em gmail.com> escreveu: > Leo, > > Concordo que essa "dobradinha" não é algo comum mas temos hoje o > IronPython e IronRuby e são implementações em CLI bem competentes > mostrando que isso é possível e viável. > > Temos hoje também um projeto que visa implementar o Perl 6 em uma virtual > machine .Net que é o projeto Niecza. > https://github.com/sorear/niecza > > E a alguns anos fiz uma implementação que integrava um serviço escrito em > .Net a um modulo Perl para trabalhar com processamento e informações > relacionados a notas fiscais eletrônicas de uma grande empresa de logística > nacional. O volume de notas processadas por dia era bem impressionante e o > projeto foi bem sério e crítico pois essas informações precisavam ser > repassadas para os clientes! > > > Não estou defendendo nem criticando nada... estou lhe dando outro ponto de > vista e você tira suas conclusões a partir daqui! ;-) > > Grande abraço, > > > > * > Daniel Vinciguerra* > Web Solutions Architect and Co-Owner at Bivee > http://github.com/dvinciguerra > > > 2013/10/25 Daniel Vinciguerra > >> Boa tarde Aureliano, >> >> Visual Perl era um projeto da Active State que visava implementar um >> add-on para o Visual Studio na esperança de possibilitar o desenvolvimento >> Perl usando o IDE Visual Studio. >> >> >> http://web.archive.org/web/20011107130136/http://www.activestate.com/Products/Visual_Perl/ >> >> >> O projeto foi descontinuado e logo após foi substituído pelo atual >> ActiveState Komodo IDE¹ que é uma ferramenta multiplataforma baseada na >> interessante e multiplataforma GUI XUL² da Mozilla. >> >> Temos algumas formas de fazer Perl e .Net trabalharem juntas mas não >> temos um interpretador Perl construído para CLI³. >> >> 1 - http://www.activestate.com/komodo-ide >> 2 - https://developer.mozilla.org/en/docs/XUL >> 3 - http://en.wikipedia.org/wiki/Common_Language_Infrastructure >> >> Abraço, >> >> >> * >> Daniel Vinciguerra* >> Web Solutions Architect and Co-Owner at Bivee >> http://github.com/dvinciguerra >> >> >> 2013/10/25 Aureliano Guedes >> >>> Ola monges, >>> >>> Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre >>> um tal de Visual Perl (parece que assim que chamam). >>> >>> Parece que seria um modo de desenvolver aplicações visuais em Perl >>> dentro do MS Visual Studio. >>> >>> Não sei se seria na plataforma .NET (o que acharia ridículo, já que no >>> final tudo vira MSIL), >>> ou se usaria as ferramentas do VS para desenvolver a interface gráfica. >>> >>> Bom, fiquei muito curioso. >>> >>> Vocês que são muito mais experientes que eu, sabem de alguma coisa do >>> tipo. >>> >>> Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver >>> para Windows (Ruindows). >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 25 16:04:35 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 25 Oct 2013 23:04:35 +0000 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, , , , , Message-ID: Iorgute sabor laranja é bom, por sinal. Bom, não consigo enxergar também Perl rodando na plataforma .NET, realmente, Perl não tem as mesmas falhas que o interpretador Ruby ou Python, contudo, se fosse possível desenvolver programas com interface gráfica tão boas quanto a de projetos WPF e ainda com a praticidade do Visual Studio (que diga-se de passagem, entrega quase que o código todo pronto) seria muito interessante, pois possibilitaria desenvolver rapidamente aplicações "debilmentaly-frendily-user". Agora se fosse acontecer como acontece com o VB.Net e o C#, onde a única coisa que muda é a sintaxe da linguagem, mas no final tudo vira MSIL, seria ridículo e ainda perderiamos todas as vantagens que Perl nos fornece. Eu mesmo estou desenvolvendo um sistema para uma empresa que abri recentemente.Estou fazendo em VB.Net, pois meus dois sócios precisam saber usar o sistema também, hoje, para aplicações visuais para Windows não vejo nada melhor que .NET, independente de ser C# ou VB. Agora, Daniel Vinciguerra, quanto a parte de emissão de NF-e, você se importaria de me dar umas dicas de como foi feito? Achei interessante, não emito mais que 50 NF-e por mês mas seria interessante se eu aplicar esse método. No final, não há nenhum projeto, seja Perl5 ou Perl6, ativo e promissor, visando desenvolvimento de ferramentas para construção de interface gráfica descente em Perl? From: leonardo.balter em gmail.com Date: Fri, 25 Oct 2013 16:42:41 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] Visual Perl Só vejo algumas justificativas para a existência de IronPython e IronRuby: - tentativa de resolver problema de performance e escalabilidade de interpretador Python ou Ruby. Não vejo esse problema com Perl, isso parece melhor solucionado. - Política corporativa. Desenvolvedores frustrados com .NET querem a experiência de outra linguagem e partem para essas linguagens que - atualmente - são mainstream entre as dinâmicas. - Java tem isso, .NET tem que ter igual, vide o C#. - Prova conceitual e de mkt para atrair desenvolvedores Python e Ruby para o uso de estrutura .NET. Acho que devs Perl não caem nessa, é muito "meh", pois não resolve muita coisa em Perl. Não estou criticando um IronPerl/ Visual Perl que seja, mas pra mim é uma combinação que não faz sentido. Tipo suco de laranja e iogurte. :) Em 25 de outubro de 2013 16:31, Daniel Vinciguerra escreveu: Leo, Concordo que essa "dobradinha" não é algo comum mas temos hoje o IronPython e IronRuby e são implementações em CLI bem competentes mostrando que isso é possível e viável. Temos hoje também um projeto que visa implementar o Perl 6 em uma virtual machine .Net que é o projeto Niecza. https://github.com/sorear/niecza E a alguns anos fiz uma implementação que integrava um serviço escrito em .Net a um modulo Perl para trabalhar com processamento e informações relacionados a notas fiscais eletrônicas de uma grande empresa de logística nacional. O volume de notas processadas por dia era bem impressionante e o projeto foi bem sério e crítico pois essas informações precisavam ser repassadas para os clientes! Não estou defendendo nem criticando nada... estou lhe dando outro ponto de vista e você tira suas conclusões a partir daqui! ;-) Grande abraço, Daniel Vinciguerra Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Daniel Vinciguerra Boa tarde Aureliano, Visual Perl era um projeto da Active State que visava implementar um add-on para o Visual Studio na esperança de possibilitar o desenvolvimento Perl usando o IDE Visual Studio. http://web.archive.org/web/20011107130136/http://www.activestate.com/Products/Visual_Perl/ O projeto foi descontinuado e logo após foi substituído pelo atual ActiveState Komodo IDE¹ que é uma ferramenta multiplataforma baseada na interessante e multiplataforma GUI XUL² da Mozilla. Temos algumas formas de fazer Perl e .Net trabalharem juntas mas não temos um interpretador Perl construído para CLI³. 1 - http://www.activestate.com/komodo-ide 2 - https://developer.mozilla.org/en/docs/XUL 3 - http://en.wikipedia.org/wiki/Common_Language_Infrastructure Abraço, Daniel Vinciguerra Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Aureliano Guedes Ola monges, Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre um tal de Visual Perl (parece que assim que chamam). Parece que seria um modo de desenvolver aplicações visuais em Perl dentro do MS Visual Studio. Não sei se seria na plataforma .NET (o que acharia ridículo, já que no final tudo vira MSIL),ou se usaria as ferramentas do VS para desenvolver a interface gráfica. Bom, fiquei muito curioso. Vocês que são muito mais experientes que eu, sabem de alguma coisa do tipo. Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver para Windows (Ruindows). _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 25 18:32:26 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 26 Oct 2013 01:32:26 +0000 Subject: [Rio-pm] Visual Perl In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, , , , , , , , , , , Message-ID: Por sinal, sempre me pareceu que a MS nunca deu muita moral para o Perl, fora os roubos de projetos. Parrot se não me engano viria para fazer o que a plataforma .NET hoje faz. Parrot se não estou enganado é mais antigo que o .NET. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Fri, 25 Oct 2013 23:04:35 +0000 Subject: Re: [Rio-pm] Visual Perl Iorgute sabor laranja é bom, por sinal. Bom, não consigo enxergar também Perl rodando na plataforma .NET, realmente, Perl não tem as mesmas falhas que o interpretador Ruby ou Python, contudo, se fosse possível desenvolver programas com interface gráfica tão boas quanto a de projetos WPF e ainda com a praticidade do Visual Studio (que diga-se de passagem, entrega quase que o código todo pronto) seria muito interessante, pois possibilitaria desenvolver rapidamente aplicações "debilmentaly-frendily-user". Agora se fosse acontecer como acontece com o VB.Net e o C#, onde a única coisa que muda é a sintaxe da linguagem, mas no final tudo vira MSIL, seria ridículo e ainda perderiamos todas as vantagens que Perl nos fornece. Eu mesmo estou desenvolvendo um sistema para uma empresa que abri recentemente.Estou fazendo em VB.Net, pois meus dois sócios precisam saber usar o sistema também, hoje, para aplicações visuais para Windows não vejo nada melhor que .NET, independente de ser C# ou VB. Agora, Daniel Vinciguerra, quanto a parte de emissão de NF-e, você se importaria de me dar umas dicas de como foi feito? Achei interessante, não emito mais que 50 NF-e por mês mas seria interessante se eu aplicar esse método. No final, não há nenhum projeto, seja Perl5 ou Perl6, ativo e promissor, visando desenvolvimento de ferramentas para construção de interface gráfica descente em Perl? From: leonardo.balter em gmail.com Date: Fri, 25 Oct 2013 16:42:41 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] Visual Perl Só vejo algumas justificativas para a existência de IronPython e IronRuby: - tentativa de resolver problema de performance e escalabilidade de interpretador Python ou Ruby. Não vejo esse problema com Perl, isso parece melhor solucionado. - Política corporativa. Desenvolvedores frustrados com .NET querem a experiência de outra linguagem e partem para essas linguagens que - atualmente - são mainstream entre as dinâmicas. - Java tem isso, .NET tem que ter igual, vide o C#. - Prova conceitual e de mkt para atrair desenvolvedores Python e Ruby para o uso de estrutura .NET. Acho que devs Perl não caem nessa, é muito "meh", pois não resolve muita coisa em Perl. Não estou criticando um IronPerl/ Visual Perl que seja, mas pra mim é uma combinação que não faz sentido. Tipo suco de laranja e iogurte. :) Em 25 de outubro de 2013 16:31, Daniel Vinciguerra escreveu: Leo, Concordo que essa "dobradinha" não é algo comum mas temos hoje o IronPython e IronRuby e são implementações em CLI bem competentes mostrando que isso é possível e viável. Temos hoje também um projeto que visa implementar o Perl 6 em uma virtual machine .Net que é o projeto Niecza. https://github.com/sorear/niecza E a alguns anos fiz uma implementação que integrava um serviço escrito em .Net a um modulo Perl para trabalhar com processamento e informações relacionados a notas fiscais eletrônicas de uma grande empresa de logística nacional. O volume de notas processadas por dia era bem impressionante e o projeto foi bem sério e crítico pois essas informações precisavam ser repassadas para os clientes! Não estou defendendo nem criticando nada... estou lhe dando outro ponto de vista e você tira suas conclusões a partir daqui! ;-) Grande abraço, Daniel Vinciguerra Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Daniel Vinciguerra Boa tarde Aureliano, Visual Perl era um projeto da Active State que visava implementar um add-on para o Visual Studio na esperança de possibilitar o desenvolvimento Perl usando o IDE Visual Studio. http://web.archive.org/web/20011107130136/http://www.activestate.com/Products/Visual_Perl/ O projeto foi descontinuado e logo após foi substituído pelo atual ActiveState Komodo IDE¹ que é uma ferramenta multiplataforma baseada na interessante e multiplataforma GUI XUL² da Mozilla. Temos algumas formas de fazer Perl e .Net trabalharem juntas mas não temos um interpretador Perl construído para CLI³. 1 - http://www.activestate.com/komodo-ide 2 - https://developer.mozilla.org/en/docs/XUL 3 - http://en.wikipedia.org/wiki/Common_Language_Infrastructure Abraço, Daniel Vinciguerra Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/25 Aureliano Guedes Ola monges, Andei lendo alguns boatos, mas nenhuma fonte segura e/ou confiável sobre um tal de Visual Perl (parece que assim que chamam). Parece que seria um modo de desenvolver aplicações visuais em Perl dentro do MS Visual Studio. Não sei se seria na plataforma .NET (o que acharia ridículo, já que no final tudo vira MSIL),ou se usaria as ferramentas do VS para desenvolver a interface gráfica. Bom, fiquei muito curioso. Vocês que são muito mais experientes que eu, sabem de alguma coisa do tipo. Seria legal, pois o GTK++ é ridículo, o ruim seria só pode desenvolver para Windows (Ruindows). _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 27 09:15:34 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 27 Oct 2013 16:15:34 +0000 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, , , , , , , , , , , , , , , , , , , , Message-ID: Boa tarde,Monges. Gostaria de saber se alguém conhece algum módulo voltado para integração com a secretaria da fazenda para emissão de nota fiscal eletrônica? Obrigado, -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From andregarciacarneiro em gmail.com Sun Oct 27 17:54:21 2013 From: andregarciacarneiro em gmail.com (Andre Carneiro) Date: Sun, 27 Oct 2013 22:54:21 -0200 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Aureliano Acho difícil que exista algo desse tipo em qualquer linguagem, que não seja proprietário. Mesmo para poder usar a API via webservice é preciso está credenciado pela receita federal, e o serviço, se não me engano, é pago! O que acho um absurdo, mas isso não importa! Achei esse material aqui num fórum. Não sei se está atualizado Espero que seja útil! http://www.guj.com.br/posts/downloadAttach/4710.java Fuçando mais um pouquinho achei isso aqui: http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca Por acaso é a origem do documento que encontrei no fórum. Mas não encontrei essas coisas no site da receita federal. Provavelmente porque não deveria mesmo estar lá! Proost! 2013/10/27 Aureliano Guedes > Boa tarde, > Monges. > > Gostaria de saber se alguém conhece algum módulo voltado para integração > com a secretaria da fazenda para emissão de nota fiscal eletrônica? > > Obrigado, > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- André Garcia Carneiro Software Engineer (11)982907780 -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Oct 28 04:38:44 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 28 Oct 2013 11:38:44 +0000 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, , , , , , , , , Message-ID: Bom, eu já havia lido a respeito, e vi que é bem complicadinho, pois existe muita burrocracia (regrinha), alem de que a maioria dos desenvolvedores que conheci que mechem com isso falaram que não há consenso entre os órgãos.A exemplo disso é o código das cidades, o CEP é o modelo mais conhecido para identificar uma cidade, mas na receita federal são identificados por outro número, e no IBGE outro. Em Delphi, existe um componente chamado AcBR (http://acbr.sourceforge.net/drupal/?q=node/36) não é um emissor, mas adianta o trabalho e muito.No CPAN tem um módulo chamado Business::BR::NFe::RPS::TXT (http://search.cpan.org/~rentocron/Business-BR-NFe-RPS-TXT-0.0124/lib/Business/BR/NFe/RPS/TXT.pm), e só. Pensei em tentar desenvolver um módulo para facilitar o desenvolvimento de emissores de NF-e em Perl, pois acho que ficaria muito bom já que tem empresas que emitem um volume assustador de notas. O emissor gratuito do governo trava totalmente quando você emite mais de 30 notas por dia, digo pois conheço um cara mão-de-vaca, que só usa ele e passa dificuldades por conta disso. Quanto a ser pago, vou verificar, pois também acho um absurdo se fosse (pago para receita, não para empresas que desenvolvem essas ferramentas), contudo o emissor gratuito do governo não é pago, o que me faz pensar que eu tenho direito de desenvolver meu próprio emissor sem precisar pagar nada pra ninguém. Date: Sun, 27 Oct 2013 22:54:21 -0200 From: andregarciacarneiro em gmail.com To: rio-pm em pm.org Subject: Re: [Rio-pm] Emissão de NF-e Aureliano Acho difícil que exista algo desse tipo em qualquer linguagem, que não seja proprietário. Mesmo para poder usar a API via webservice é preciso está credenciado pela receita federal, e o serviço, se não me engano, é pago! O que acho um absurdo, mas isso não importa! Achei esse material aqui num fórum. Não sei se está atualizado Espero que seja útil! http://www.guj.com.br/posts/downloadAttach/4710.java Fuçando mais um pouquinho achei isso aqui: http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca Por acaso é a origem do documento que encontrei no fórum. Mas não encontrei essas coisas no site da receita federal. Provavelmente porque não deveria mesmo estar lá! Proost! 2013/10/27 Aureliano Guedes Boa tarde,Monges. Gostaria de saber se alguém conhece algum módulo voltado para integração com a secretaria da fazenda para emissão de nota fiscal eletrônica? Obrigado, _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- André Garcia Carneiro Software Engineer (11)982907780 _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From renato.cron em gmail.com Mon Oct 28 04:42:12 2013 From: renato.cron em gmail.com (Renato Santos) Date: Mon, 28 Oct 2013 09:42:12 -0200 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Hmm, e um plus, sobre o B:BR:NFe::RPS::TXT é que ele é apenas para o estado de São Paulo E o TXT tem que ser enviado manualmente pelo contador/responsavel. ---- Até onde eu sei, o mais completo em linguagens não java nem .net é o http://www.nfephp.org/ porém nunca usei! 2013/10/28 Aureliano Guedes > Bom, eu já havia lido a respeito, e vi que é bem complicadinho, pois > existe muita burrocracia (regrinha), alem de que a maioria dos > desenvolvedores que conheci que mechem com isso falaram que não há consenso > entre os órgãos. > A exemplo disso é o código das cidades, o CEP é o modelo mais conhecido > para identificar uma cidade, mas na receita federal são identificados por > outro número, e no IBGE outro. > > Em Delphi, existe um componente chamado AcBR ( > http://acbr.sourceforge.net/drupal/?q=node/36) não é um emissor, mas > adianta o trabalho e muito. > No CPAN tem um módulo chamado Business::BR::NFe::RPS::TXT ( > http://search.cpan.org/~rentocron/Business-BR-NFe-RPS-TXT-0.0124/lib/Business/BR/NFe/RPS/TXT.pm), > e só. > > Pensei em tentar desenvolver um módulo para facilitar o desenvolvimento de > emissores de NF-e em Perl, pois acho que ficaria muito bom já que tem > empresas que emitem um volume assustador de notas. > > O emissor gratuito do governo trava totalmente quando você emite mais de > 30 notas por dia, digo pois conheço um cara mão-de-vaca, que só usa ele e > passa dificuldades por conta disso. > > Quanto a ser pago, vou verificar, pois também acho um absurdo se fosse > (pago para receita, não para empresas que desenvolvem essas ferramentas), > contudo o emissor gratuito do governo não é pago, o que me faz pensar que > eu tenho direito de desenvolver meu próprio emissor sem precisar pagar nada > pra ninguém. > > > > ------------------------------ > Date: Sun, 27 Oct 2013 22:54:21 -0200 > From: andregarciacarneiro em gmail.com > To: rio-pm em pm.org > Subject: Re: [Rio-pm] Emissão de NF-e > > > Aureliano > > Acho difícil que exista algo desse tipo em qualquer linguagem, que não > seja proprietário. Mesmo para poder usar a API via webservice é preciso > está credenciado pela receita federal, e o serviço, se não me engano, é > pago! O que acho um absurdo, mas isso não importa! > > > Achei esse material aqui num fórum. Não sei se está atualizado Espero que > seja útil! > > http://www.guj.com.br/posts/downloadAttach/4710.java > > > Fuçando mais um pouquinho achei isso aqui: > > http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca > > > Por acaso é a origem do documento que encontrei no fórum. Mas não > encontrei essas coisas no site da receita federal. Provavelmente porque não > deveria mesmo estar lá! > > Proost! > > > > 2013/10/27 Aureliano Guedes > > Boa tarde, > Monges. > > Gostaria de saber se alguém conhece algum módulo voltado para integração > com a secretaria da fazenda para emissão de nota fiscal eletrônica? > > Obrigado, > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > André Garcia Carneiro > Software Engineer > (11)982907780 > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From dan.vinciguerra em gmail.com Mon Oct 28 05:41:56 2013 From: dan.vinciguerra em gmail.com (Daniel Vinciguerra) Date: Mon, 28 Oct 2013 10:41:56 -0200 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Se alguém iniciar o projeto eu me proponho a contribuir! Só deve ser definido bem se o projeto em questão será para nota fiscal eletrônica (federal) ou para notas de serviço (municipal e cada prefeitura possui uma implementação). Abraço, * Daniel Vinciguerra* Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/28 Renato Santos > Hmm, > > e um plus, sobre o B:BR:NFe::RPS::TXT é que ele é apenas para o estado de > São Paulo > > E o TXT tem que ser enviado manualmente pelo contador/responsavel. > > ---- > > Até onde eu sei, o mais completo em linguagens não java nem .net é o > http://www.nfephp.org/ > > porém nunca usei! > > > > 2013/10/28 Aureliano Guedes > >> Bom, eu já havia lido a respeito, e vi que é bem complicadinho, pois >> existe muita burrocracia (regrinha), alem de que a maioria dos >> desenvolvedores que conheci que mechem com isso falaram que não há consenso >> entre os órgãos. >> A exemplo disso é o código das cidades, o CEP é o modelo mais conhecido >> para identificar uma cidade, mas na receita federal são identificados por >> outro número, e no IBGE outro. >> >> Em Delphi, existe um componente chamado AcBR ( >> http://acbr.sourceforge.net/drupal/?q=node/36) não é um emissor, mas >> adianta o trabalho e muito. >> No CPAN tem um módulo chamado Business::BR::NFe::RPS::TXT ( >> http://search.cpan.org/~rentocron/Business-BR-NFe-RPS-TXT-0.0124/lib/Business/BR/NFe/RPS/TXT.pm), >> e só. >> >> Pensei em tentar desenvolver um módulo para facilitar o desenvolvimento >> de emissores de NF-e em Perl, pois acho que ficaria muito bom já que tem >> empresas que emitem um volume assustador de notas. >> >> O emissor gratuito do governo trava totalmente quando você emite mais de >> 30 notas por dia, digo pois conheço um cara mão-de-vaca, que só usa ele e >> passa dificuldades por conta disso. >> >> Quanto a ser pago, vou verificar, pois também acho um absurdo se fosse >> (pago para receita, não para empresas que desenvolvem essas ferramentas), >> contudo o emissor gratuito do governo não é pago, o que me faz pensar que >> eu tenho direito de desenvolver meu próprio emissor sem precisar pagar nada >> pra ninguém. >> >> >> >> ------------------------------ >> Date: Sun, 27 Oct 2013 22:54:21 -0200 >> From: andregarciacarneiro em gmail.com >> To: rio-pm em pm.org >> Subject: Re: [Rio-pm] Emissão de NF-e >> >> >> Aureliano >> >> Acho difícil que exista algo desse tipo em qualquer linguagem, que não >> seja proprietário. Mesmo para poder usar a API via webservice é preciso >> está credenciado pela receita federal, e o serviço, se não me engano, é >> pago! O que acho um absurdo, mas isso não importa! >> >> >> Achei esse material aqui num fórum. Não sei se está atualizado Espero que >> seja útil! >> >> http://www.guj.com.br/posts/downloadAttach/4710.java >> >> >> Fuçando mais um pouquinho achei isso aqui: >> >> http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca >> >> >> Por acaso é a origem do documento que encontrei no fórum. Mas não >> encontrei essas coisas no site da receita federal. Provavelmente porque não >> deveria mesmo estar lá! >> >> Proost! >> >> >> >> 2013/10/27 Aureliano Guedes >> >> Boa tarde, >> Monges. >> >> Gostaria de saber se alguém conhece algum módulo voltado para integração >> com a secretaria da fazenda para emissão de nota fiscal eletrônica? >> >> Obrigado, >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> André Garcia Carneiro >> Software Engineer >> (11)982907780 >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From renato.cron em gmail.com Mon Oct 28 05:47:02 2013 From: renato.cron em gmail.com (Renato Santos) Date: Mon, 28 Oct 2013 10:47:02 -0200 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com> Message-ID: Até onde eu lembro, o maior problema mesmo era conseguir testar se os XML estavam corretos, pq tem q ter os arquivos de chaves e etc. eu não entendo bem disso (embora seja o mantedor do modulo haha) acho que pra pequenas empresas que queiram fazer isso, compensa pagar algum terceiro. mas seria bem legal ter em perl, poderia ate virar concorrente dessas empresas que vendem para pequnas! 2013/10/28 Daniel Vinciguerra > Se alguém iniciar o projeto eu me proponho a contribuir! > > Só deve ser definido bem se o projeto em questão será para nota fiscal > eletrônica (federal) ou para notas de serviço (municipal e cada prefeitura > possui uma implementação). > > Abraço, > > > * > Daniel Vinciguerra* > Web Solutions Architect and Co-Owner at Bivee > http://github.com/dvinciguerra > > > 2013/10/28 Renato Santos > >> Hmm, >> >> e um plus, sobre o B:BR:NFe::RPS::TXT é que ele é apenas para o estado de >> São Paulo >> >> E o TXT tem que ser enviado manualmente pelo contador/responsavel. >> >> ---- >> >> Até onde eu sei, o mais completo em linguagens não java nem .net é o >> http://www.nfephp.org/ >> >> porém nunca usei! >> >> >> >> 2013/10/28 Aureliano Guedes >> >>> Bom, eu já havia lido a respeito, e vi que é bem complicadinho, pois >>> existe muita burrocracia (regrinha), alem de que a maioria dos >>> desenvolvedores que conheci que mechem com isso falaram que não há consenso >>> entre os órgãos. >>> A exemplo disso é o código das cidades, o CEP é o modelo mais conhecido >>> para identificar uma cidade, mas na receita federal são identificados por >>> outro número, e no IBGE outro. >>> >>> Em Delphi, existe um componente chamado AcBR ( >>> http://acbr.sourceforge.net/drupal/?q=node/36) não é um emissor, mas >>> adianta o trabalho e muito. >>> No CPAN tem um módulo chamado Business::BR::NFe::RPS::TXT ( >>> http://search.cpan.org/~rentocron/Business-BR-NFe-RPS-TXT-0.0124/lib/Business/BR/NFe/RPS/TXT.pm), >>> e só. >>> >>> Pensei em tentar desenvolver um módulo para facilitar o desenvolvimento >>> de emissores de NF-e em Perl, pois acho que ficaria muito bom já que tem >>> empresas que emitem um volume assustador de notas. >>> >>> O emissor gratuito do governo trava totalmente quando você emite mais de >>> 30 notas por dia, digo pois conheço um cara mão-de-vaca, que só usa ele e >>> passa dificuldades por conta disso. >>> >>> Quanto a ser pago, vou verificar, pois também acho um absurdo se fosse >>> (pago para receita, não para empresas que desenvolvem essas ferramentas), >>> contudo o emissor gratuito do governo não é pago, o que me faz pensar que >>> eu tenho direito de desenvolver meu próprio emissor sem precisar pagar nada >>> pra ninguém. >>> >>> >>> >>> ------------------------------ >>> Date: Sun, 27 Oct 2013 22:54:21 -0200 >>> From: andregarciacarneiro em gmail.com >>> To: rio-pm em pm.org >>> Subject: Re: [Rio-pm] Emissão de NF-e >>> >>> >>> Aureliano >>> >>> Acho difícil que exista algo desse tipo em qualquer linguagem, que não >>> seja proprietário. Mesmo para poder usar a API via webservice é preciso >>> está credenciado pela receita federal, e o serviço, se não me engano, é >>> pago! O que acho um absurdo, mas isso não importa! >>> >>> >>> Achei esse material aqui num fórum. Não sei se está atualizado Espero >>> que seja útil! >>> >>> http://www.guj.com.br/posts/downloadAttach/4710.java >>> >>> >>> Fuçando mais um pouquinho achei isso aqui: >>> >>> http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca >>> >>> >>> Por acaso é a origem do documento que encontrei no fórum. Mas não >>> encontrei essas coisas no site da receita federal. Provavelmente porque não >>> deveria mesmo estar lá! >>> >>> Proost! >>> >>> >>> >>> 2013/10/27 Aureliano Guedes >>> >>> Boa tarde, >>> Monges. >>> >>> Gostaria de saber se alguém conhece algum módulo voltado para integração >>> com a secretaria da fazenda para emissão de nota fiscal eletrônica? >>> >>> Obrigado, >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> >>> -- >>> André Garcia Carneiro >>> Software Engineer >>> (11)982907780 >>> >>> _______________________________________________ Rio-pm mailing list >>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Saravá, >> Renato CRON >> http://www.renatocron.com/blog/ >> @renato_cron >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Oct 28 09:31:37 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 28 Oct 2013 16:31:37 +0000 Subject: [Rio-pm] =?iso-8859-1?q?Emiss=E3o_de_NF-e?= In-Reply-To: References: <86obbw54zq.fsf@red.stonehenge.com>, , , , , , , , , , , , , Message-ID: Eu pensei em fazer direcionado para a nota fiscal eletrônica (Federal).No mínimo iria facilitar a vida de muita gente que passa meses (isso mesmo, meses) para desenvolver um sistema de geração de NF-e. Deixo claro que não tenho intuito de ganhar dinheiro com isso, sou só um bioinformata e dono de confecção,Mas eu lanço aqui a proposta de desenvolver esse sistema, eu mesmo vou começar a estudar o assunto e vou entrar nesse projeto,Quem quiser entrar nesse projeto comigo será bem vindo, podemos discutir sobre como faremos, por onde começar, pensei em ate mesmo criar um site para o projeto. Estou criando um sistema de gerenciamento para minha empresa, mas esta sendo em Delphi (que é um lixo de linguagem por sinal), mas consigo "criar" tempo ainda para o projeto. Deixo aqui e-mail e skype:guedes.aureliano em gmail.comaureliano.guedes From: renato.cron em gmail.com Date: Mon, 28 Oct 2013 10:47:02 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] Emissão de NF-e Até onde eu lembro, o maior problema mesmo era conseguir testar se os XML estavam corretos, pq tem q ter os arquivos de chaves e etc. eu não entendo bem disso (embora seja o mantedor do modulo haha) acho que pra pequenas empresas que queiram fazer isso, compensa pagar algum terceiro. mas seria bem legal ter em perl, poderia ate virar concorrente dessas empresas que vendem para pequnas! 2013/10/28 Daniel Vinciguerra Se alguém iniciar o projeto eu me proponho a contribuir! Só deve ser definido bem se o projeto em questão será para nota fiscal eletrônica (federal) ou para notas de serviço (municipal e cada prefeitura possui uma implementação). Abraço, Daniel Vinciguerra Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/10/28 Renato Santos Hmm, e um plus, sobre o B:BR:NFe::RPS::TXT é que ele é apenas para o estado de São Paulo E o TXT tem que ser enviado manualmente pelo contador/responsavel. ---- Até onde eu sei, o mais completo em linguagens não java nem .net é o http://www.nfephp.org/ porém nunca usei! 2013/10/28 Aureliano Guedes Bom, eu já havia lido a respeito, e vi que é bem complicadinho, pois existe muita burrocracia (regrinha), alem de que a maioria dos desenvolvedores que conheci que mechem com isso falaram que não há consenso entre os órgãos. A exemplo disso é o código das cidades, o CEP é o modelo mais conhecido para identificar uma cidade, mas na receita federal são identificados por outro número, e no IBGE outro. Em Delphi, existe um componente chamado AcBR (http://acbr.sourceforge.net/drupal/?q=node/36) não é um emissor, mas adianta o trabalho e muito. No CPAN tem um módulo chamado Business::BR::NFe::RPS::TXT (http://search.cpan.org/~rentocron/Business-BR-NFe-RPS-TXT-0.0124/lib/Business/BR/NFe/RPS/TXT.pm), e só. Pensei em tentar desenvolver um módulo para facilitar o desenvolvimento de emissores de NF-e em Perl, pois acho que ficaria muito bom já que tem empresas que emitem um volume assustador de notas. O emissor gratuito do governo trava totalmente quando você emite mais de 30 notas por dia, digo pois conheço um cara mão-de-vaca, que só usa ele e passa dificuldades por conta disso. Quanto a ser pago, vou verificar, pois também acho um absurdo se fosse (pago para receita, não para empresas que desenvolvem essas ferramentas), contudo o emissor gratuito do governo não é pago, o que me faz pensar que eu tenho direito de desenvolver meu próprio emissor sem precisar pagar nada pra ninguém. Date: Sun, 27 Oct 2013 22:54:21 -0200 From: andregarciacarneiro em gmail.com To: rio-pm em pm.org Subject: Re: [Rio-pm] Emissão de NF-e Aureliano Acho difícil que exista algo desse tipo em qualquer linguagem, que não seja proprietário. Mesmo para poder usar a API via webservice é preciso está credenciado pela receita federal, e o serviço, se não me engano, é pago! O que acho um absurdo, mas isso não importa! Achei esse material aqui num fórum. Não sei se está atualizado Espero que seja útil! http://www.guj.com.br/posts/downloadAttach/4710.java Fuçando mais um pouquinho achei isso aqui: http://www.ticontrole.gov.br/portal/page/portal/ticontrole/biblioteca Por acaso é a origem do documento que encontrei no fórum. Mas não encontrei essas coisas no site da receita federal. Provavelmente porque não deveria mesmo estar lá! Proost! 2013/10/27 Aureliano Guedes Boa tarde,Monges. Gostaria de saber se alguém conhece algum módulo voltado para integração com a secretaria da fazenda para emissão de nota fiscal eletrônica? Obrigado, _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- André Garcia Carneiro Software Engineer (11)982907780 _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leprevostfv em gmail.com Wed Oct 30 09:03:04 2013 From: leprevostfv em gmail.com (Felipe da Veiga Leprevost) Date: Wed, 30 Oct 2013 14:03:04 -0200 Subject: [Rio-pm] =?iso-8859-1?q?YAPC=3A=3ABrasil=2C_=FAltima_semana_para_?= =?iso-8859-1?q?se_inscrever_!?= Message-ID: <1383148984.9941.8.camel@pollux> Olá Pessoas, Este e-mail é para lembrá-los de que esta é a última semana para se inscreverem no YAPC::Brasil. Aqueles que ainda não fizeram sua inscrição, podem acessar a página de venda dos ingressos e garantir o seu! site do evento: http://yapcbrasil.org.br/ site de compra dos ingressos: http://yapcbrasil.eventbrite.com/ Lembrando que os ingressos estão com preços bastante acessíveis, então aproveitem. Abraços. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leprevostfv em gmail.com Thu Oct 31 19:27:11 2013 From: leprevostfv em gmail.com (Felipe da Veiga Leprevost) Date: Fri, 01 Nov 2013 00:27:11 -0200 Subject: [Rio-pm] Estadia em Curitiba par ao YAPC Message-ID: <1383272831.23942.41437741.7DD1FBAF@webmail.messagingengine.com> Olá Pessoal, Estou escrevendo para lhes pedir que aqueles que necessitam de estadia em Curitiba, que o vejam o quanto antes. A capacidade hoteleira de Curitiba em Novembro está no seu limite de ocupação devido a diferentes acontecimentos sem conexão entre si que irão ocorrer simultâneamente em Novembro, no mesmo período do YAPC. Muitos dos hotéis da cidade já estão com lotação máxima, restando algumas opções de estadias mais simples e hostels, ainda há hotéis disponíveis mas está realmente muito difícil de achar estadia para a data do nosso evento. Por conta disso, há a possibilidade de hospedagem na região metropolitana de Curitiba, mais especificamente Pinhais 10km do local do YAPC, São José dos Pinhais a 19km, Campo Largo a 28km e Araucária a 34km. A região metropolitana é integrada ao sistema de ônibus de Curitiba mas por ser final de semana e feriado o número de ônibus pode ser reduzido e o tempo de viagem estendido. Peço que agilizem pois infelizmente a série de eventos que irá acontecer na cidade e que não possui conexão entre si acabaram por criar, em uam das futuras cidades (não tão preparada assim), sedes da copa, uma falta grande de hotéis disponíveis. Como de costume, eu e os demais colegas de Curitiba estamos à disposição para ajudar com o que for necessários. Abraços. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leprevostfv em gmail.com Sun Nov 3 07:57:54 2013 From: leprevostfv em gmail.com (Felipe da Veiga Leprevost) Date: Sun, 03 Nov 2013 13:57:54 -0200 Subject: [Rio-pm] =?utf-8?q?Pr=C3=AAmio_YAPC=3A=3ABrasil_2013?= Message-ID: <1383494274.25555.42323921.23B0679E@webmail.messagingengine.com> Olá pessoal, Nós havíamos preparado uma página de votos para o prêmio YAPC::Brasil 2013, utilizando mobrater mas não deu muito certo, então nós preparamos uma página especial para a eleição do homenageado. Vocês podem contribuir com o seu voto em: [1]http://2013.yapcbrasil.org.br/premio Na página há uma pequena descrição sobre os critérios para o voto. Façam os seus votos e divulguem a página para quem vocês conheçam, o ganhador será homenageado ao final do YAPC com um pequeno prêmio. Abraços References 1. http://2013.yapcbrasil.org.br/premio -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sat Nov 9 18:47:48 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 10 Nov 2013 02:47:48 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= Message-ID: Fiz um algoritimo para encodar e decodar alguma coisa codificada de acordo com a Cifra de Vigenère. Cheio de POG's mas a titulo só de distração. http://pastebin.com/ZzT9zZGb Exemplo: Texto:ATACARBASESULChave:LIMAOLIMAOLIMTexto cifrado:LBMCOCJMSSDCX -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sat Nov 9 19:13:10 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 01:13:10 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: Message-ID: divertido agora saca so como vc pode fazer "diferente"" 1 ao inves de print "PALAVRA: " . $ARGV[0] . "\n"; podes fazer say "PALAVRA: $ARGV[0]"; 2- usa funcao isalpha pode ser simplificada (return 1 if ... ) sub isalpha { chr($_[0]) =~ /[a-zA-Z]/ } 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; agora é importante vc fazer um script de teste, onde vc chama as funcoes de encode e decode na mão e testa os valores. assim vc pode refatorar o script sem medo de errar alguma coisa. 2013/11/10 Aureliano Guedes > Fiz um algoritimo para encodar e decodar alguma coisa codificada de acordo > com a Cifra de Vigenère. > > Cheio de POG's mas a titulo só de distração. > > http://pastebin.com/ZzT9zZGb > > Exemplo: > Texto:ATACARBASESULChave: LIMAOLIMAOLIMTexto cifrado:LBMCOCJMSSDCX > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sat Nov 9 19:15:34 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 01:15:34 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: Message-ID: Alias de uma olhada https://metacpan.org/source/PACMAN/Acme-Lelek-1.003/lib/Acme/Lelek.pm eu fiz este modulo pra brincar com o autobox::Core. 2013/11/10 Tiago Peczenyj > divertido > > agora saca so como vc pode fazer "diferente"" > > 1 ao inves de > > print "PALAVRA: " . $ARGV[0] . "\n"; > > podes fazer > > say "PALAVRA: $ARGV[0]"; > > 2- usa funcao isalpha pode ser simplificada (return 1 if ... ) > > sub isalpha { chr($_[0]) =~ /[a-zA-Z]/ } > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > agora é importante vc fazer um script de teste, onde vc chama as funcoes > de encode e decode na mão e testa os valores. assim vc pode refatorar o > script sem medo de errar alguma coisa. > > > 2013/11/10 Aureliano Guedes > >> Fiz um algoritimo para encodar e decodar alguma coisa codificada de >> acordo com a Cifra de Vigenère. >> >> Cheio de POG's mas a titulo só de distração. >> >> http://pastebin.com/ZzT9zZGb >> >> Exemplo: >> Texto:ATACARBASESULChave: LIMAOLIMAOLIMTexto cifrado:LBMCOCJMSSDCX >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From nuba em fastmail.fm Sat Nov 9 22:16:56 2013 From: nuba em fastmail.fm (Nuba Princigalli) Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: Message-ID: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Nov 10 14:47:54 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 10 Nov 2013 22:47:54 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZxScript teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Nov 10 15:00:04 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 21:00:04 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1, ); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Nov 10 16:02:23 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 00:02:23 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , Message-ID: Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna éAttribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Nov 10 16:22:14 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 22:22:14 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Nov 10 16:35:12 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 00:35:12 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , Message-ID: Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Nov 10 16:42:46 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 22:42:46 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: mostra o codigo 2013/11/10 Aureliano Guedes > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Nov 10 17:00:57 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 01:00:57 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , Message-ID: #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco');$a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From bruno.buss em gmail.com Sun Nov 10 17:39:42 2013 From: bruno.buss em gmail.com (Bruno Buss) Date: Sun, 10 Nov 2013 23:39:42 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...] my $a = Vigenere->new( key => 'cinco', word => 'teste' ); say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Bruno C. Buss http://www.brunobuss.net -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Nov 10 17:48:51 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 10 Nov 2013 23:48:51 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: Ah Tente no construtor. ->new( key => ... Em 10/11/2013 23:01, "Aureliano Guedes" escreveu: > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Nov 10 18:24:58 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 02:24:58 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , Message-ID: Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erroUse of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Mon Nov 11 03:57:14 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Mon, 11 Nov 2013 09:57:14 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes > Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava > em Perl. > > Tem um outro probleminha ocorrendo. > > Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o > seguinte erro > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > A linha 22 é > sub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} > > Mas, eu criei esse package a partir desse script aqui -> > http://pastebin.com/svEkjFJj > > Que tem a mesma rotina escrita da mesma forma. > > Por algum motivo funciona em um e em outro não. > > Por que será?? > > É o $_[0]?? > > ------------------------------ > From: bruno.buss em gmail.com > Date: Sun, 10 Nov 2013 23:39:42 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Oi Aureliano, > > Quando você define um atributo como required no Moose, você precisa > passa-lo pelo construtor do seu objeto (new()). > > No caso, seu código ficaria assim: > > [...] > my $a = Vigenere->new( key => 'cinco', word => 'teste' ); > say "Resultado: " . $a->encode(); > > > > 2013/11/10 Aureliano Guedes > > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 11 06:01:16 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 14:01:16 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , , , Message-ID: Eu não entendi quanto a ler o parâmetro a partir do atributo e receber dois parâmetros, mas eu fiz um teste. Eu criei um método BUILD da seguinte forma sub BUILD{ my $self = shift; my (@w, @k); @w = split (//, $self->word); @k = split (//, $self->key); croak "'key' and 'word' are diferent lenght\n" if($#w != $#k); foreach (@w and @k){ croak "'key' and 'word' need to be letter\n" unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); } } Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me aconselhou fazer isso no BUILD),aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram letras e coloquei para conferir isso no BUILD também (não sei se é muita POG). sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. Antes de fazer isso o erro que retornava apontava para a linha do 'isalpha', agora está apontando para a linha do 'toupper', que é uma função que traduz o hex ASCII para caracter, passa para upcase e retorna como hex denovo (logo 97 vira 65, assim por diante). sub toupper{ord(uc chr $_[0])} #<- line 25Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o problema é eu tentar tratar usando essa string "$_[0]",não sei se estou falando besteira, mas como o script teste.pl herda a classe, parece que a rotina tenta receber a string do script e não do módulo. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 09:57:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erro Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 11 09:28:38 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 17:28:38 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , , , , , , , , , , , , , , Message-ID: Corrigi, mudando o código todohttp://pastebin.com/dqzZXXzM Agora vou tentar em só uma linha. LOL From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 14:01:16 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Eu não entendi quanto a ler o parâmetro a partir do atributo e receber dois parâmetros, mas eu fiz um teste. Eu criei um método BUILD da seguinte forma sub BUILD{ my $self = shift; my (@w, @k); @w = split (//, $self->word); @k = split (//, $self->key); croak "'key' and 'word' are diferent lenght\n" if($#w != $#k); foreach (@w and @k){ croak "'key' and 'word' need to be letter\n" unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); } } Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me aconselhou fazer isso no BUILD),aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram letras e coloquei para conferir isso no BUILD também (não sei se é muita POG). sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. Antes de fazer isso o erro que retornava apontava para a linha do 'isalpha', agora está apontando para a linha do 'toupper', que é uma função que traduz o hex ASCII para caracter, passa para upcase e retorna como hex denovo (logo 97 vira 65, assim por diante). sub toupper{ord(uc chr $_[0])} #<- line 25Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o problema é eu tentar tratar usando essa string "$_[0]",não sei se estou falando besteira, mas como o script teste.pl herda a classe, parece que a rotina tenta receber a string do script e não do módulo. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 09:57:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erro Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Mon Nov 11 09:32:21 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Mon, 11 Nov 2013 15:32:21 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: só falta vc usar o autobox::Core 2013/11/11 Aureliano Guedes > Corrigi, mudando o código todo > http://pastebin.com/dqzZXXzM > > Agora vou tentar em só uma linha. LOL > > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Mon, 11 Nov 2013 14:01:16 +0000 > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Eu não entendi quanto a ler o parâmetro a partir do atributo e receber > dois parâmetros, > > mas eu fiz um teste. > > Eu criei um método BUILD da seguinte forma > > sub BUILD{ > my $self = shift; > my (@w, @k); > @w = split (//, $self->word); > @k = split (//, $self->key); > croak "'key' and 'word' are diferent lenght\n" > if($#w != $#k); > foreach (@w and @k){ > croak "'key' and 'word' need to be letter\n" > unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); > } > } > > Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me > aconselhou fazer isso no BUILD), > aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram > letras e coloquei para conferir isso no BUILD também > (não sei se é muita POG). > > sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > Antes de fazer isso o erro que retornava apontava para a linha do > 'isalpha', agora está apontando para a linha do 'toupper', que é uma função > que traduz o hex ASCII para caracter, passa para upcase e retorna como hex > denovo (logo 97 vira 65, assim por diante). > > sub toupper{ord(uc chr $_[0])} #<- line 25 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. > > Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o > problema é eu tentar tratar usando essa string "$_[0]", > não sei se estou falando besteira, mas como o script teste.pl herda a > classe, parece que a rotina tenta receber a string do script e não do > módulo. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 09:57:14 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > vejamos > > anteriormente as suas funcoes recebiam 2 parametros > > agora elas leem os parametros a partir dos atributos e eu acho isso... > esquisito. > > veja só, não ha muita razão para armazenar estes dois atributos nessa > classe. vc tem que pensar em termos de Objetos. > > vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia > armazenar a chave como atributo e assim reusar o objeto para encodar um > texto a ser recebido. > > AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo > aqui (ai envolve explicação sobre list context e atribuição): > > my (@word, @key) = (tochar($self->word), tochar($self->key)); > > tente fazer > > my @key = tochar($self->key); > my @word = tochar($self->word); > > > > 2013/11/11 Aureliano Guedes > > Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava > em Perl. > > Tem um outro probleminha ocorrendo. > > Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o > seguinte erro > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > A linha 22 é > sub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} > > Mas, eu criei esse package a partir desse script aqui -> > http://pastebin.com/svEkjFJj > > Que tem a mesma rotina escrita da mesma forma. > > Por algum motivo funciona em um e em outro não. > > Por que será?? > > É o $_[0]?? > > ------------------------------ > From: bruno.buss em gmail.com > Date: Sun, 10 Nov 2013 23:39:42 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Oi Aureliano, > > Quando você define um atributo como required no Moose, você precisa > passa-lo pelo construtor do seu objeto (new()). > > No caso, seu código ficaria assim: > > [...] > my $a = Vigenere->new( key => 'cinco', word => 'teste' ); > say "Resultado: " . $a->encode(); > > > > 2013/11/10 Aureliano Guedes > > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 11 09:49:23 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 17:49:23 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , , , , , , Message-ID: Achei esse módulo muito interessante mesmo, mas ainda estou conhecendo o território. Vou tentar aplicar ele. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 15:32:21 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère só falta vc usar o autobox::Core 2013/11/11 Aureliano Guedes Corrigi, mudando o código todohttp://pastebin.com/dqzZXXzM Agora vou tentar em só uma linha. LOL From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 14:01:16 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Eu não entendi quanto a ler o parâmetro a partir do atributo e receber dois parâmetros, mas eu fiz um teste. Eu criei um método BUILD da seguinte forma sub BUILD{ my $self = shift; my (@w, @k); @w = split (//, $self->word); @k = split (//, $self->key); croak "'key' and 'word' are diferent lenght\n" if($#w != $#k); foreach (@w and @k){ croak "'key' and 'word' need to be letter\n" unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); } } Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me aconselhou fazer isso no BUILD), aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram letras e coloquei para conferir isso no BUILD também (não sei se é muita POG). sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. Antes de fazer isso o erro que retornava apontava para a linha do 'isalpha', agora está apontando para a linha do 'toupper', que é uma função que traduz o hex ASCII para caracter, passa para upcase e retorna como hex denovo (logo 97 vira 65, assim por diante). sub toupper{ord(uc chr $_[0])} #<- line 25Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o problema é eu tentar tratar usando essa string "$_[0]", não sei se estou falando besteira, mas como o script teste.pl herda a classe, parece que a rotina tenta receber a string do script e não do módulo. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 09:57:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erro Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 11 12:31:34 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 20:31:34 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , , , , , , , , , , , , , , , , , , , , Message-ID: Tiago, o máximo que consegui ate agora usando o autobox::Core foi #!usr/bin/env perluse common::sense;use autobox::Core; my @word;my @key;@word->push($_->ord) foreach $ARGV[0]->uc->split('');@key->push($_->ord) foreach $ARGV[1]->uc->split('');for (my $a = 0; $a <= $#key; $a++){ ((($word[$_] + $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'e'); ((($word[$_] - $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'd');} From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 17:49:23 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Achei esse módulo muito interessante mesmo, mas ainda estou conhecendo o território. Vou tentar aplicar ele. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 15:32:21 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère só falta vc usar o autobox::Core 2013/11/11 Aureliano Guedes Corrigi, mudando o código todohttp://pastebin.com/dqzZXXzM Agora vou tentar em só uma linha. LOL From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 14:01:16 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Eu não entendi quanto a ler o parâmetro a partir do atributo e receber dois parâmetros, mas eu fiz um teste. Eu criei um método BUILD da seguinte forma sub BUILD{ my $self = shift; my (@w, @k); @w = split (//, $self->word); @k = split (//, $self->key); croak "'key' and 'word' are diferent lenght\n" if($#w != $#k); foreach (@w and @k){ croak "'key' and 'word' need to be letter\n" unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); } } Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me aconselhou fazer isso no BUILD), aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram letras e coloquei para conferir isso no BUILD também (não sei se é muita POG). sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. Antes de fazer isso o erro que retornava apontava para a linha do 'isalpha', agora está apontando para a linha do 'toupper', que é uma função que traduz o hex ASCII para caracter, passa para upcase e retorna como hex denovo (logo 97 vira 65, assim por diante). sub toupper{ord(uc chr $_[0])} #<- line 25Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o problema é eu tentar tratar usando essa string "$_[0]", não sei se estou falando besteira, mas como o script teste.pl herda a classe, parece que a rotina tenta receber a string do script e não do módulo. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 09:57:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erro Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Mon Nov 11 14:10:26 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Mon, 11 Nov 2013 20:10:26 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: my @word = $ARGV[0]->uc->split('')->map( sub{ $_->ord} ); ou my @word map { ord $_ } split '', uc $ARGV[0]; vc decide :) 2013/11/11 Aureliano Guedes > Tiago, o máximo que consegui ate agora usando o autobox::Core foi > > #!usr/bin/env perl > use common::sense; > use autobox::Core; > > my @word; > my @key; > @word->push($_->ord) foreach $ARGV[0]->uc->split(''); > @key->push($_->ord) foreach $ARGV[1]->uc->split(''); > for (my $a = 0; $a <= $#key; $a++){ > ((($word[$_] + $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'e'); > ((($word[$_] - $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'd');} > > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Mon, 11 Nov 2013 17:49:23 +0000 > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Achei esse módulo muito interessante mesmo, mas ainda estou conhecendo o > território. Vou tentar aplicar ele. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 15:32:21 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > só falta vc usar o autobox::Core > > > 2013/11/11 Aureliano Guedes > > Corrigi, mudando o código todo > http://pastebin.com/dqzZXXzM > > Agora vou tentar em só uma linha. LOL > > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Mon, 11 Nov 2013 14:01:16 +0000 > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Eu não entendi quanto a ler o parâmetro a partir do atributo e receber > dois parâmetros, > > mas eu fiz um teste. > > Eu criei um método BUILD da seguinte forma > > sub BUILD{ > my $self = shift; > my (@w, @k); > @w = split (//, $self->word); > @k = split (//, $self->key); > croak "'key' and 'word' are diferent lenght\n" > if($#w != $#k); > foreach (@w and @k){ > croak "'key' and 'word' need to be letter\n" > unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); > } > } > > Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me > aconselhou fazer isso no BUILD), > aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram > letras e coloquei para conferir isso no BUILD também > (não sei se é muita POG). > > sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > Antes de fazer isso o erro que retornava apontava para a linha do > 'isalpha', agora está apontando para a linha do 'toupper', que é uma função > que traduz o hex ASCII para caracter, passa para upcase e retorna como hex > denovo (logo 97 vira 65, assim por diante). > > sub toupper{ord(uc chr $_[0])} #<- line 25 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. > > Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o > problema é eu tentar tratar usando essa string "$_[0]", > não sei se estou falando besteira, mas como o script teste.pl herda a > classe, parece que a rotina tenta receber a string do script e não do > módulo. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 09:57:14 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > vejamos > > anteriormente as suas funcoes recebiam 2 parametros > > agora elas leem os parametros a partir dos atributos e eu acho isso... > esquisito. > > veja só, não ha muita razão para armazenar estes dois atributos nessa > classe. vc tem que pensar em termos de Objetos. > > vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia > armazenar a chave como atributo e assim reusar o objeto para encodar um > texto a ser recebido. > > AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo > aqui (ai envolve explicação sobre list context e atribuição): > > my (@word, @key) = (tochar($self->word), tochar($self->key)); > > tente fazer > > my @key = tochar($self->key); > my @word = tochar($self->word); > > > > 2013/11/11 Aureliano Guedes > > Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava > em Perl. > > Tem um outro probleminha ocorrendo. > > Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o > seguinte erro > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > A linha 22 é > sub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} > > Mas, eu criei esse package a partir desse script aqui -> > http://pastebin.com/svEkjFJj > > Que tem a mesma rotina escrita da mesma forma. > > Por algum motivo funciona em um e em outro não. > > Por que será?? > > É o $_[0]?? > > ------------------------------ > From: bruno.buss em gmail.com > Date: Sun, 10 Nov 2013 23:39:42 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Oi Aureliano, > > Quando você define um atributo como required no Moose, você precisa > passa-lo pelo construtor do seu objeto (new()). > > No caso, seu código ficaria assim: > > [...] > my $a = Vigenere->new( key => 'cinco', word => 'teste' ); > say "Resultado: " . $a->encode(); > > > > 2013/11/10 Aureliano Guedes > > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 11 15:16:22 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 11 Nov 2013 23:16:22 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: , , <1384064216.24045.45377985.38427714@webmail.messagingengine.com>, , , , , , , , , , , , , , , , Message-ID: Tava tentando achar um jeito de remover esse laço 'for'.E talvez reduzir para 1 linha de código.se ja reduziu de 30 linhas para 5, talvez seja possível. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 20:10:26 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère my @word = $ARGV[0]->uc->split('')->map( sub{ $_->ord} ); ou my @word map { ord $_ } split '', uc $ARGV[0]; vc decide :) 2013/11/11 Aureliano Guedes Tiago, o máximo que consegui ate agora usando o autobox::Core foi #!usr/bin/env perluse common::sense;use autobox::Core; my @word; my @key;@word->push($_->ord) foreach $ARGV[0]->uc->split('');@key->push($_->ord) foreach $ARGV[1]->uc->split('');for (my $a = 0; $a <= $#key; $a++){ ((($word[$_] + $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'e'); ((($word[$_] - $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'd');} From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 17:49:23 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Achei esse módulo muito interessante mesmo, mas ainda estou conhecendo o território. Vou tentar aplicar ele. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 15:32:21 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère só falta vc usar o autobox::Core 2013/11/11 Aureliano Guedes Corrigi, mudando o código todohttp://pastebin.com/dqzZXXzM Agora vou tentar em só uma linha. LOL From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Mon, 11 Nov 2013 14:01:16 +0000 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Eu não entendi quanto a ler o parâmetro a partir do atributo e receber dois parâmetros, mas eu fiz um teste. Eu criei um método BUILD da seguinte forma sub BUILD{ my $self = shift; my (@w, @k); @w = split (//, $self->word); @k = split (//, $self->key); croak "'key' and 'word' are diferent lenght\n" if($#w != $#k); foreach (@w and @k){ croak "'key' and 'word' need to be letter\n" unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); } } Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me aconselhou fazer isso no BUILD), aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram letras e coloquei para conferir isso no BUILD também (não sei se é muita POG). sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. Antes de fazer isso o erro que retornava apontava para a linha do 'isalpha', agora está apontando para a linha do 'toupper', que é uma função que traduz o hex ASCII para caracter, passa para upcase e retorna como hex denovo (logo 97 vira 65, assim por diante). sub toupper{ord(uc chr $_[0])} #<- line 25Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o problema é eu tentar tratar usando essa string "$_[0]", não sei se estou falando besteira, mas como o script teste.pl herda a classe, parece que a rotina tenta receber a string do script e não do módulo. From: tiago.peczenyj em gmail.com Date: Mon, 11 Nov 2013 09:57:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère vejamos anteriormente as suas funcoes recebiam 2 parametros agora elas leem os parametros a partir dos atributos e eu acho isso... esquisito. veja só, não ha muita razão para armazenar estes dois atributos nessa classe. vc tem que pensar em termos de Objetos. vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia armazenar a chave como atributo e assim reusar o objeto para encodar um texto a ser recebido. AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo aqui (ai envolve explicação sobre list context e atribuição): my (@word, @key) = (tochar($self->word), tochar($self->key)); tente fazer my @key = tochar($self->key); my @word = tochar($self->word); 2013/11/11 Aureliano Guedes Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava em Perl. Tem um outro probleminha ocorrendo. Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o seguinte erro Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. A linha 22 ésub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} Mas, eu criei esse package a partir desse script aqui -> http://pastebin.com/svEkjFJj Que tem a mesma rotina escrita da mesma forma. Por algum motivo funciona em um e em outro não. Por que será?? É o $_[0]?? From: bruno.buss em gmail.com Date: Sun, 10 Nov 2013 23:39:42 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Oi Aureliano, Quando você define um atributo como required no Moose, você precisa passa-lo pelo construtor do seu objeto (new()). No caso, seu código ficaria assim: [...]my $a = Vigenere->new( key => 'cinco', word => 'teste' );say "Resultado: " . $a->encode(); 2013/11/10 Aureliano Guedes #!usr/env/bin perl use feature 'say';use common::sense;use Vigenere; my $a = Vigenere->new();$a->key('cinco'); $a->word('teste'); say "Resultado: " . $a->encode(); From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:42:46 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère mostra o codigo 2013/11/10 Aureliano Guedes Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja preenchendo de forma errada. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 22:22:14 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère sim pq este erro vem do fato que este atributo é requerido se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs no seu script antes de instanciar a classe. assim vc separa as coisas :) 2013/11/10 Aureliano Guedes Bom, usei o Moose como recomendou, mais pratico.Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar da virgula. Mas o erro que retorna é Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm line 519 Por algum motivo, é como se não fosse atribuido valor algum a key. Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei com preguissa de usar para validar, mas vou mudar para que word e key tenham o mesmo tamanho sempre. From: tiago.peczenyj em gmail.com Date: Sun, 10 Nov 2013 21:00:04 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère Aureliano com Moose vc pode marcar um atributo como required. assim se alguem esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. has 'word' =>( is => 'rw', isa => 'Str', required => 1,); melhor do que utilizar 'default' para validação. eu uso MUITO o default mas justamente para inicializar o que eu preciso. alias se vc precisa validar o tamanho da chave e do texto, vc poderia utilizar BUILD para isso. http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod agora o que vc quer dizer com isso? if (isalpha($word[$a]), isalpha($key[$a])){ o que é um if com virgula? 2013/11/10 Aureliano Guedes Bom, fiz as mudanças aconselhadas e mais outras,ainda transformei em uma classe. Vigenere.pm-> http://pastebin.com/aL4brPZx Script teste -> http://pastebin.com/nbuqPqUr Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl Por algum motivo tem alguma coisa dando errado com o Moose, ainda não identifiquei, alguém ai sabe o que poderia ser?? From: nuba em fastmail.fm To: rio-pm em pm.org Date: Sun, 10 Nov 2013 04:16:56 -0200 Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: 3- use map :) ao inves de my @b = split (//, $c); for (my $i = 0; $i < @b; $i++){ $b[$i] = ord $b[$i]; } podes fazer return map { ord } split //, $c; quer enxugar mais uma gota? faz map ord, split //, $c; :) -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Mon Nov 11 15:20:46 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Mon, 11 Nov 2013 21:20:46 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BFun_-_passa_tempo=5D_Cifra_de_Vigen=E8?= =?iso-8859-1?q?re?= In-Reply-To: References: <1384064216.24045.45377985.38427714@webmail.messagingengine.com> Message-ID: nao pensa em reduzir tanto. tem que ficar legivel 2013/11/11 Aureliano Guedes > Tava tentando achar um jeito de remover esse laço 'for'. > E talvez reduzir para 1 linha de código. > se ja reduziu de 30 linhas para 5, talvez seja possível. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 20:10:26 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > my @word = $ARGV[0]->uc->split('')->map( sub{ $_->ord} ); > > ou > > my @word map { ord $_ } split '', uc $ARGV[0]; > > vc decide :) > > > > 2013/11/11 Aureliano Guedes > > Tiago, o máximo que consegui ate agora usando o autobox::Core foi > > #!usr/bin/env perl > use common::sense; > use autobox::Core; > > my @word; > my @key; > @word->push($_->ord) foreach $ARGV[0]->uc->split(''); > @key->push($_->ord) foreach $ARGV[1]->uc->split(''); > for (my $a = 0; $a <= $#key; $a++){ > ((($word[$_] + $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'e'); > ((($word[$_] - $key[$_])%26)+65)->chr->print if ($ARGV[2] eq 'd');} > > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Mon, 11 Nov 2013 17:49:23 +0000 > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Achei esse módulo muito interessante mesmo, mas ainda estou conhecendo o > território. Vou tentar aplicar ele. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 15:32:21 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > só falta vc usar o autobox::Core > > > 2013/11/11 Aureliano Guedes > > Corrigi, mudando o código todo > http://pastebin.com/dqzZXXzM > > Agora vou tentar em só uma linha. LOL > > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Mon, 11 Nov 2013 14:01:16 +0000 > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Eu não entendi quanto a ler o parâmetro a partir do atributo e receber > dois parâmetros, > > mas eu fiz um teste. > > Eu criei um método BUILD da seguinte forma > > sub BUILD{ > my $self = shift; > my (@w, @k); > @w = split (//, $self->word); > @k = split (//, $self->key); > croak "'key' and 'word' are diferent lenght\n" > if($#w != $#k); > foreach (@w and @k){ > croak "'key' and 'word' need to be letter\n" > unless($w[$_] =~ /[a-zA-Z]/ || $k[$_] =~ /[a-zA-Z]/); > } > } > > Então é conferido se 'word' e 'key' tem o mesmo tamanho (você me > aconselhou fazer isso no BUILD), > aproveitei e retirei a rotina 'isalpha' que conferia se o caractere eram > letras e coloquei para conferir isso no BUILD também > (não sei se é muita POG). > > sub isalpha{(chr shift) =~ /[a-zA-Z]/} #<-line 22 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > Antes de fazer isso o erro que retornava apontava para a linha do > 'isalpha', agora está apontando para a linha do 'toupper', que é uma função > que traduz o hex ASCII para caracter, passa para upcase e retorna como hex > denovo (logo 97 vira 65, assim por diante). > > sub toupper{ord(uc chr $_[0])} #<- line 25 > Use of uninitialized value $_[0] in chr at Vigenere.pm line 25. > > Tentei debugar mas não entendi nada, mas de qualquer forma eu acho que o > problema é eu tentar tratar usando essa string "$_[0]", > não sei se estou falando besteira, mas como o script teste.pl herda a > classe, parece que a rotina tenta receber a string do script e não do > módulo. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Mon, 11 Nov 2013 09:57:14 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > vejamos > > anteriormente as suas funcoes recebiam 2 parametros > > agora elas leem os parametros a partir dos atributos e eu acho isso... > esquisito. > > veja só, não ha muita razão para armazenar estes dois atributos nessa > classe. vc tem que pensar em termos de Objetos. > > vc tem um objeto que SABE fazer encode / decode. no maximo vc poderia > armazenar a chave como atributo e assim reusar o objeto para encodar um > texto a ser recebido. > > AGORA, vc tem o erro por que deve estar fazendo algo de muito creativo > aqui (ai envolve explicação sobre list context e atribuição): > > my (@word, @key) = (tochar($self->word), tochar($self->key)); > > tente fazer > > my @key = tochar($self->key); > my @word = tochar($self->word); > > > > 2013/11/11 Aureliano Guedes > > Bom, parece que to enferrujado mesmo, fazia um tempinho que não programava > em Perl. > > Tem um outro probleminha ocorrendo. > > Aqui -> http://pastebin.com/XJ512YYx na classe, esta retornando o > seguinte erro > Use of uninitialized value $_[0] in chr at Vigenere.pm line 22. > > A linha 22 é > sub isalpha{chr ($_[0]) =~ /[a-zA-Z]/} > > Mas, eu criei esse package a partir desse script aqui -> > http://pastebin.com/svEkjFJj > > Que tem a mesma rotina escrita da mesma forma. > > Por algum motivo funciona em um e em outro não. > > Por que será?? > > É o $_[0]?? > > ------------------------------ > From: bruno.buss em gmail.com > Date: Sun, 10 Nov 2013 23:39:42 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Oi Aureliano, > > Quando você define um atributo como required no Moose, você precisa > passa-lo pelo construtor do seu objeto (new()). > > No caso, seu código ficaria assim: > > [...] > my $a = Vigenere->new( key => 'cinco', word => 'teste' ); > say "Resultado: " . $a->encode(); > > > > 2013/11/10 Aureliano Guedes > > #!usr/env/bin perl > > use feature 'say'; > use common::sense; > use Vigenere; > > my $a = Vigenere->new(); > $a->key('cinco'); > $a->word('teste'); > > > say "Resultado: " . $a->encode(); > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:42:46 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > mostra o codigo > > > 2013/11/10 Aureliano Guedes > > Certo, mas eu estou preenchendo os atributos, a não ser que eu esteja > preenchendo de forma errada. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 22:22:14 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > sim pq este erro vem do fato que este atributo é requerido > > se vc quer dar uma mensagem mais bonitinha pro usuario, valide os imputs > no seu script antes de instanciar a classe. assim vc separa as coisas :) > > > 2013/11/10 Aureliano Guedes > > Bom, usei o Moose como recomendou, mais pratico. > Quanto ao if, realmente foi falta de atenção, deveria ser um && no lugar > da virgula. > > Mas o erro que retorna é > Attribute (key) is required at C:/Perl/site/lib/Moose/Meta/Attribute.pm > line 519 > > Por algum motivo, é como se não fosse atribuido valor algum a key. > > Quanto ao metodo BUILD é que como ja tinha o codigo quase pronto fiquei > com preguissa de usar para validar, mas vou mudar para que word e key > tenham o mesmo tamanho sempre. > > > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 10 Nov 2013 21:00:04 -0200 > To: rio-pm em pm.org > > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > Aureliano > > com Moose vc pode marcar um atributo como required. assim se alguem > esquecer ele na hora de inicializar a classe haverá uma mensagem de erro. > > has 'word' =>( > is => 'rw', > isa => 'Str', > required => 1, > ); > > melhor do que utilizar 'default' para validação. eu uso MUITO o default > mas justamente para inicializar o que eu preciso. > > alias se vc precisa validar o tamanho da chave e do texto, vc poderia > utilizar BUILD para isso. > > http://search.cpan.org/dist/Moose/lib/Moose/Manual/Construction.pod > > agora o que vc quer dizer com isso? > > if (isalpha($word[$a]), isalpha($key[$a])){ > > o que é um if com virgula? > > > 2013/11/10 Aureliano Guedes > > Bom, fiz as mudanças aconselhadas e mais outras, > ainda transformei em uma classe. > > Vigenere.pm-> http://pastebin.com/aL4brPZx > Script teste -> http://pastebin.com/nbuqPqUr > > Ou-> https://www.dropbox.com/sh/4diypsz4y2puvxq/t0HuRZLvZW/Vigenere_Perl > > Por algum motivo tem alguma coisa dando errado com o Moose, ainda não > identifiquei, alguém ai sabe o que poderia ser?? > ------------------------------ > From: nuba em fastmail.fm > To: rio-pm em pm.org > Date: Sun, 10 Nov 2013 04:16:56 -0200 > Subject: Re: [Rio-pm] [Fun - passa tempo] Cifra de Vigenère > > > > > > On Sun, Nov 10, 2013, at 01:13 AM, Tiago Peczenyj wrote: > > 3- use map :) > > ao inves de > > my @b = split (//, $c); > for (my $i = 0; $i < @b; $i++){ > $b[$i] = ord $b[$i]; > } > > podes fazer > > return map { ord } split //, $c; > > > quer enxugar mais uma gota? faz > > map ord, split //, $c; > > :) > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 25 10:04:03 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 25 Nov 2013 18:04:03 +0000 Subject: [Rio-pm] [HELP] Controlando comandos do sistema Message-ID: Boa tarde,Monges. Gostaria de saber se existe a possibilidade de eu controlar comandos do sistema? Bom, quando estamos executando algum script, se eu quiser encerra-lo a qualquer momento basta que eu tecle Ctrl + C.Mas e se eu quisesse, especificamente em um script, determinar que seu encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, como deveria fazer? Desde já grato. Att,Aureliano Guedes -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From renato.cron em gmail.com Mon Nov 25 10:06:43 2013 From: renato.cron em gmail.com (Renato Santos) Date: Mon, 25 Nov 2013 16:06:43 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: você tem que ignorar o sinal de KILL do sistema. para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html algo para ignorar pra sempre, $SIG{KILL} = 'IGNORE'; 2013/11/25 Aureliano Guedes > Boa tarde, > Monges. > > Gostaria de saber se existe a possibilidade de eu controlar comandos do > sistema? > > Bom, quando estamos executando algum script, se eu quiser encerra-lo a > qualquer momento basta que eu tecle Ctrl + C. > Mas e se eu quisesse, especificamente em um script, determinar que seu > encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao > apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, > como deveria fazer? > > Desde já grato. > > Att, > Aureliano Guedes > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From oscarbm em gmail.com Mon Nov 25 10:07:25 2013 From: oscarbm em gmail.com (Oscar Marques) Date: Mon, 25 Nov 2013 16:07:25 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: Boa pergunta, no perl eu nao sei. No shell é ~ $ trap trap -- '' SIGTSTP trap -- '' SIGTTIN trap -- '' SIGTTOU Acho que já um caminho pra voce pesquisar. Em 25 de novembro de 2013 16:04, Aureliano Guedes escreveu: > Boa tarde, > Monges. > > Gostaria de saber se existe a possibilidade de eu controlar comandos do > sistema? > > Bom, quando estamos executando algum script, se eu quiser encerra-lo a > qualquer momento basta que eu tecle Ctrl + C. > Mas e se eu quisesse, especificamente em um script, determinar que seu > encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao > apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, > como deveria fazer? > > Desde já grato. > > Att, > Aureliano Guedes > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Oscar Marques oscarbm em gmail.com http://www.dunkelheit.com.br @f117usbr +55 21 9293-9343 -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From alpbs2003 em gmail.com Mon Nov 25 10:10:34 2013 From: alpbs2003 em gmail.com (Andre Luis) Date: Mon, 25 Nov 2013 16:10:34 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi ele quer tratar $SIG{KILL} = sub { do_something() }; Em 25 de novembro de 2013 16:06, Renato Santos escreveu: > você tem que ignorar o sinal de KILL do sistema. > > > para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html > > algo para ignorar pra sempre, > > > $SIG{KILL} = 'IGNORE'; > > > > 2013/11/25 Aureliano Guedes > >> Boa tarde, >> Monges. >> >> Gostaria de saber se existe a possibilidade de eu controlar comandos do >> sistema? >> >> Bom, quando estamos executando algum script, se eu quiser encerra-lo a >> qualquer momento basta que eu tecle Ctrl + C. >> Mas e se eu quisesse, especificamente em um script, determinar que seu >> encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao >> apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, >> como deveria fazer? >> >> Desde já grato. >> >> Att, >> Aureliano Guedes >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- "technology does not drive change - it enables change" -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 25 10:10:58 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 25 Nov 2013 18:10:58 +0000 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: , Message-ID: Opa, respostas rápidas, obrigado.Já deu uma luz, vou ver aqui, se eu descobrir eu falo aqui. Date: Mon, 25 Nov 2013 16:07:25 -0200 From: oscarbm em gmail.com To: rio-pm em pm.org Subject: Re: [Rio-pm] [HELP] Controlando comandos do sistema Boa pergunta, no perl eu nao sei.No shell é ~ $ traptrap -- '' SIGTSTPtrap -- '' SIGTTINtrap -- '' SIGTTOUAcho que já um caminho pra voce pesquisar. Em 25 de novembro de 2013 16:04, Aureliano Guedes escreveu: Boa tarde,Monges. Gostaria de saber se existe a possibilidade de eu controlar comandos do sistema? Bom, quando estamos executando algum script, se eu quiser encerra-lo a qualquer momento basta que eu tecle Ctrl + C. Mas e se eu quisesse, especificamente em um script, determinar que seu encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, como deveria fazer? Desde já grato. Att,Aureliano Guedes _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Oscar Marques oscarbm em gmail.com http://www.dunkelheit.com.br @f117usbr +55 21 9293-9343 _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From alpbs2003 em gmail.com Mon Nov 25 10:18:56 2013 From: alpbs2003 em gmail.com (Andre Luis) Date: Mon, 25 Nov 2013 16:18:56 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: Exemplo: #!/usr/bin/perl my $down = 0; @SIG{qw( INT TERM HUP )} = sub { $down++; die('Going down') if $down >= 3; }; while (1) { print "TESTE\n"; sleep 1; } Em 25 de novembro de 2013 16:10, Andre Luis escreveu: > nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi > ele quer tratar > > > $SIG{KILL} = sub { do_something() }; > > > > > Em 25 de novembro de 2013 16:06, Renato Santos escreveu: > > você tem que ignorar o sinal de KILL do sistema. >> >> >> para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html >> >> algo para ignorar pra sempre, >> >> >> $SIG{KILL} = 'IGNORE'; >> >> >> >> 2013/11/25 Aureliano Guedes >> >>> Boa tarde, >>> Monges. >>> >>> Gostaria de saber se existe a possibilidade de eu controlar comandos do >>> sistema? >>> >>> Bom, quando estamos executando algum script, se eu quiser encerra-lo a >>> qualquer momento basta que eu tecle Ctrl + C. >>> Mas e se eu quisesse, especificamente em um script, determinar que seu >>> encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao >>> apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, >>> como deveria fazer? >>> >>> Desde já grato. >>> >>> Att, >>> Aureliano Guedes >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Saravá, >> Renato CRON >> http://www.renatocron.com/blog/ >> @renato_cron >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > "technology does not drive change - it enables change" > -- "technology does not drive change - it enables change" -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From renato.cron em gmail.com Mon Nov 25 10:22:07 2013 From: renato.cron em gmail.com (Renato Santos) Date: Mon, 25 Nov 2013 16:22:07 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: SIGINT 2 Term Interrupt from keyboard Esse é o CTRL+C, $SIG{INT} = 'IGNORE'; não consegui fazer assim: my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 }; não sei porque, alguem sabe? 2013/11/25 Andre Luis > nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi > ele quer tratar > > > > $SIG{KILL} = sub { do_something() }; > > > > > Em 25 de novembro de 2013 16:06, Renato Santos escreveu: > > você tem que ignorar o sinal de KILL do sistema. >> >> >> para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html >> >> algo para ignorar pra sempre, >> >> >> $SIG{KILL} = 'IGNORE'; >> >> >> >> 2013/11/25 Aureliano Guedes >> >>> Boa tarde, >>> Monges. >>> >>> Gostaria de saber se existe a possibilidade de eu controlar comandos do >>> sistema? >>> >>> Bom, quando estamos executando algum script, se eu quiser encerra-lo a >>> qualquer momento basta que eu tecle Ctrl + C. >>> Mas e se eu quisesse, especificamente em um script, determinar que seu >>> encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao >>> apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, >>> como deveria fazer? >>> >>> Desde já grato. >>> >>> Att, >>> Aureliano Guedes >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Saravá, >> Renato CRON >> http://www.renatocron.com/blog/ >> @renato_cron >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > "technology does not drive change - it enables change" > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Mon Nov 25 10:42:21 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Mon, 25 Nov 2013 16:42:21 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: Veja só. quando vc mandou o primeiro SIGINT, a execução do codigo foi desviada para a função anonima contida em $SIG{INT}, entretanto como vc sabe que tem que "voltar" para aonde vc estava? não sabe. veja este exemplo: my $c = 0; $SIG{INT} = sub { print "$c\n"; $c++;}; do { eval { print "$c inicio...\n"; sleep 5 ; print "... done\n"; }; } while ($c < 3); o codigo mesmo esta entre eval { ... } entretanto que sabe se deve continuar ou não é o codigo externo, o while. vc nao pode simplesmente mandar 3 SIGINT e achar que o seu script vai saber lidar com isso. vc vai PARAR a execução pra executar o bloco associado aquele trap. agora se vc quer parar o seu programa depois de 3 ctrl+c, faça o seu script criar um FORK, rodar o que precisa no processo filho e no processo pai vc controla este estado, depois do terceiro SIGINT vc pode matar o processo, por exemplo. 2013/11/25 Renato Santos > > SIGINT 2 Term Interrupt from keyboard > > > Esse é o CTRL+C, > > $SIG{INT} = 'IGNORE'; > > não consegui fazer assim: > > my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 }; > > não sei porque, alguem sabe? > > > 2013/11/25 Andre Luis > >> nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi >> ele quer tratar >> >> >> >> >> >> $SIG{KILL} = sub { do_something() }; >> >> >> >> >> Em 25 de novembro de 2013 16:06, Renato Santos escreveu: >> >> você tem que ignorar o sinal de KILL do sistema. >>> >>> >>> para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html >>> >>> algo para ignorar pra sempre, >>> >>> >>> $SIG{KILL} = 'IGNORE'; >>> >>> >>> >>> 2013/11/25 Aureliano Guedes >>> >>>> Boa tarde, >>>> Monges. >>>> >>>> Gostaria de saber se existe a possibilidade de eu controlar comandos do >>>> sistema? >>>> >>>> Bom, quando estamos executando algum script, se eu quiser encerra-lo a >>>> qualquer momento basta que eu tecle Ctrl + C. >>>> Mas e se eu quisesse, especificamente em um script, determinar que seu >>>> encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao >>>> apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, >>>> como deveria fazer? >>>> >>>> Desde já grato. >>>> >>>> Att, >>>> Aureliano Guedes >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>> >>> >>> >>> -- >>> Saravá, >>> Renato CRON >>> http://www.renatocron.com/blog/ >>> @renato_cron >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> "technology does not drive change - it enables change" >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 25 10:50:12 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 25 Nov 2013 18:50:12 +0000 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: , , , Message-ID: André Luiz, vou fazer da sua forma, obrigado.Agora fiquei sem entender porque $SIG{qw (INT TERM HUP)}... Renato, tentei fazer assim:my $c = 0; $SIG{INT} = sub { $c <= 2 ? $c++ : die }; while (1) { print "TESTE\n"; sleep 1;} Deu certo, mas deu errado, por algum motivo tenho que apertar ctrl + c umas 4 vezes ou mais para dar certo From: renato.cron em gmail.com Date: Mon, 25 Nov 2013 16:22:07 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [HELP] Controlando comandos do sistema SIGINT 2 Term Interrupt from keyboard Esse é o CTRL+C, $SIG{INT} = 'IGNORE'; não consegui fazer assim: my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 }; não sei porque, alguem sabe? 2013/11/25 Andre Luis nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi ele quer tratar $SIG{KILL} = sub { do_something() }; Em 25 de novembro de 2013 16:06, Renato Santos escreveu: você tem que ignorar o sinal de KILL do sistema. para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html algo para ignorar pra sempre,$SIG{KILL} = 'IGNORE'; 2013/11/25 Aureliano Guedes Boa tarde,Monges. Gostaria de saber se existe a possibilidade de eu controlar comandos do sistema? Bom, quando estamos executando algum script, se eu quiser encerra-lo a qualquer momento basta que eu tecle Ctrl + C. Mas e se eu quisesse, especificamente em um script, determinar que seu encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, como deveria fazer? Desde já grato. Att,Aureliano Guedes _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- "technology does not drive change - it enables change" _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Nov 25 10:51:40 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 25 Nov 2013 18:51:40 +0000 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: , , , Message-ID: André Luiz, vou fazer da sua forma, obrigado.Agora fiquei sem entender porque $SIG{qw (INT TERM HUP)}... Renato, tentei fazer assim:my $c = 0; $SIG{INT} = sub { $c <= 2 ? $c++ : die }; while (1) { print "TESTE\n"; sleep 1;} Deu certo, mas deu errado, por algum motivo tenho que apertar ctrl + c umas 4 vezes ou mais para dar certo From: renato.cron em gmail.com Date: Mon, 25 Nov 2013 16:22:07 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] [HELP] Controlando comandos do sistema SIGINT 2 Term Interrupt from keyboard Esse é o CTRL+C, $SIG{INT} = 'IGNORE'; não consegui fazer assim: my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 }; não sei porque, alguem sabe? 2013/11/25 Andre Luis nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi ele quer tratar $SIG{KILL} = sub { do_something() }; Em 25 de novembro de 2013 16:06, Renato Santos escreveu: você tem que ignorar o sinal de KILL do sistema. para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html algo para ignorar pra sempre,$SIG{KILL} = 'IGNORE'; 2013/11/25 Aureliano Guedes Boa tarde,Monges. Gostaria de saber se existe a possibilidade de eu controlar comandos do sistema? Bom, quando estamos executando algum script, se eu quiser encerra-lo a qualquer momento basta que eu tecle Ctrl + C. Mas e se eu quisesse, especificamente em um script, determinar que seu encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, como deveria fazer? Desde já grato. Att,Aureliano Guedes _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- "technology does not drive change - it enables change" _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Saravá, Renato CRONhttp://www.renatocron.com/blog/ @renato_cron _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From giulianisanches em gmail.com Mon Nov 25 11:17:35 2013 From: giulianisanches em gmail.com (Giuliani Sanches) Date: Mon, 25 Nov 2013 17:17:35 -0200 Subject: [Rio-pm] [HELP] Controlando comandos do sistema In-Reply-To: References: Message-ID: Quanto a linha $SIG{qw (INT TERM HUP)} = sub { ... } O que ele fez foi atribuir a função anonima para tres "signals" diferentes, seria o mesmo que: $SIG{INT} = sub { ... } $SIG{TERM} = sub { ... } $SIG{HUP} = sub { ... } O que cada um destes "singnals" fazem ou significam podem ser vistos aqui: https://www.gnu.org/software/bash/manual/html_node/Signals.html Abraço. Giuliani D. Sanches about.me/giulianisanches 2013/11/25 Aureliano Guedes > André Luiz, vou fazer da sua forma, obrigado. > Agora fiquei sem entender porque $SIG{qw (INT TERM HUP)}... > > Renato, tentei fazer assim: > my $c = 0; > $SIG{INT} = sub { $c <= 2 ? $c++ : die }; > > while (1) { > print "TESTE\n"; > sleep 1; > } > > Deu certo, mas deu errado, por algum motivo tenho que apertar ctrl + c > umas 4 vezes ou mais para dar certo > > > ------------------------------ > From: renato.cron em gmail.com > Date: Mon, 25 Nov 2013 16:22:07 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] [HELP] Controlando comandos do sistema > > SIGINT 2 Term Interrupt from keyboard > > > Esse é o CTRL+C, > > $SIG{INT} = 'IGNORE'; > > não consegui fazer assim: > > my $c = 0; $SIG{INT} = sub { return 'IGNORE' if $c++ < 3 }; > > não sei porque, alguem sabe? > > > 2013/11/25 Andre Luis > > nesse caso só iria ignorar ele nao irira tratar ... pelo que eu entendi > ele quer tratar > > > > $SIG{KILL} = sub { do_something() }; > > > > > Em 25 de novembro de 2013 16:06, Renato Santos escreveu: > > você tem que ignorar o sinal de KILL do sistema. > > > para saber mais sobre os sinais, http://perldoc.perl.org/perlipc.html > > algo para ignorar pra sempre, > > $SIG{KILL} = 'IGNORE'; > > > > 2013/11/25 Aureliano Guedes > > Boa tarde, > Monges. > > Gostaria de saber se existe a possibilidade de eu controlar comandos do > sistema? > > Bom, quando estamos executando algum script, se eu quiser encerra-lo a > qualquer momento basta que eu tecle Ctrl + C. > Mas e se eu quisesse, especificamente em um script, determinar que seu > encerramento fosse após apertar 3 vezes consecutivas Ctrl + C, ou então ao > apertar Ctrl + shift + C, ou sei lá, qualquer outro comando que eu queira, > como deveria fazer? > > Desde já grato. > > Att, > Aureliano Guedes > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > "technology does not drive change - it enables change" > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From jc em joaocoutinho.com.br Tue Nov 26 23:39:02 2013 From: jc em joaocoutinho.com.br (=?ISO-8859-1?Q?Jo=E3o_C=2E_Coutinho?=) Date: Wed, 27 Nov 2013 05:39:02 -0200 Subject: [Rio-pm] RPerl - Austin.pm Message-ID: Repassando, da fan page do FB. [ ]'s, João ---------- Forwarded message ---------- From: "Will Braswell" Date: Nov 26, 2013 9:50 PM Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the President of... To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> Will Braswell a publié dans Rio de Janeiro Perl Mongers [image: Will Braswell]Will Braswell26 novembre 21:50 Hello Perl friends, I'm the President of http://Austin.pm/, we're working to finish RPerl v1.0, will you please consider making a pledge to support the project? Thanks so much! Perl 5 Optimizing Compiler, RPerl v1.0 RPerl can help your low-magic Perl 5 code run up to 200 times faster than pure Perl, with full backw... Voir la publication sur Facebook· Modifier les paramètres de courrier électronique· Vous pouvez répondre à ce message pour commenter. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Wed Nov 27 09:35:31 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Wed, 27 Nov 2013 17:35:31 +0000 Subject: [Rio-pm] RPerl - Austin.pm In-Reply-To: References: Message-ID: 200 vezes mais rapido que Puro Perl???Parece ilusão Date: Wed, 27 Nov 2013 05:39:02 -0200 From: jc em joaocoutinho.com.br To: rio-pm em pm.org Subject: [Rio-pm] RPerl - Austin.pm Repassando, da fan page do FB. [ ]'s, João ---------- Forwarded message ---------- From: "Will Braswell" Date: Nov 26, 2013 9:50 PM Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the President of... To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> Will Braswell a publié dans Rio de Janeiro Perl Mongers Will Braswell 26 novembre 21:50 Hello Perl friends, I'm the President of http://Austin.pm/, we're working to finish RPerl v1.0, will you please consider making a pledge to support the project? Thanks so much! Perl 5 Optimizing Compiler, RPerl v1.0 RPerl can help your low-magic Perl 5 code run up to 200 times faster than pure Perl, with full backw... Voir la publication sur Facebook · Modifier les paramètres de courrier électronique · Vous pouvez répondre à ce message pour commenter. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Wed Nov 27 16:43:08 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Wed, 27 Nov 2013 22:43:08 -0200 Subject: [Rio-pm] RPerl - Austin.pm In-Reply-To: References: Message-ID: Não é impossível, uma vez que você remova algum overhead por exemplo. Entretanto vc vai sacrificar alguma coisa. De repente vc vai ter menos features. Vai sacrificar backward compatibility ,etc. Depende do seu gargalo. Se for I/O pode não fazer a menor diferença ser 200x mais rápido. Le 27 nov. 2013 15:35, "Aureliano Guedes" a écrit : > 200 vezes mais rapido que Puro Perl??? > Parece ilusão > > ------------------------------ > Date: Wed, 27 Nov 2013 05:39:02 -0200 > From: jc em joaocoutinho.com.br > To: rio-pm em pm.org > Subject: [Rio-pm] RPerl - Austin.pm > > Repassando, da fan page do FB. > [ ]'s, > João > > ---------- Forwarded message ---------- > From: "Will Braswell" > Date: Nov 26, 2013 9:50 PM > Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the > President of... > To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> > > Will Braswell a publié dans Rio de Janeiro Perl Mongers > [image: Will Braswell] Will > Braswell 26 > novembre 21:50 > Hello Perl friends, I'm the President of http://Austin.pm/, > we're working to finish RPerl v1.0, will you please consider making a > pledge to support the project? > Thanks so much! > > Perl > 5 Optimizing Compiler, RPerl v1.0 > RPerl can help your low-magic Perl 5 code run up to 200 times faster than > pure Perl, with full backw... > > Voir la publication sur Facebook· Modifier > les paramètres de courrier électronique· Vous pouvez répondre à ce message pour commenter. > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Wed Nov 27 16:44:20 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Wed, 27 Nov 2013 22:44:20 -0200 Subject: [Rio-pm] RPerl - Austin.pm In-Reply-To: References: Message-ID: Aliás, Perl tem JIT optimization? Le 27 nov. 2013 22:43, "Tiago Peczenyj" a écrit : > Não é impossível, uma vez que você remova algum overhead por exemplo. > Entretanto vc vai sacrificar alguma coisa. De repente vc vai ter menos > features. Vai sacrificar backward compatibility ,etc. > > Depende do seu gargalo. Se for I/O pode não fazer a menor diferença ser > 200x mais rápido. > Le 27 nov. 2013 15:35, "Aureliano Guedes" a > écrit : > >> 200 vezes mais rapido que Puro Perl??? >> Parece ilusão >> >> ------------------------------ >> Date: Wed, 27 Nov 2013 05:39:02 -0200 >> From: jc em joaocoutinho.com.br >> To: rio-pm em pm.org >> Subject: [Rio-pm] RPerl - Austin.pm >> >> Repassando, da fan page do FB. >> [ ]'s, >> João >> >> ---------- Forwarded message ---------- >> From: "Will Braswell" >> Date: Nov 26, 2013 9:50 PM >> Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the >> President of... >> To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> >> >> Will Braswell a publié dans Rio de Janeiro Perl Mongers >> [image: Will Braswell] Will >> Braswell 26 >> novembre 21:50 >> Hello Perl friends, I'm the President of http://Austin.pm/, >> we're working to finish RPerl v1.0, will you please consider making a >> pledge to support the project? >> Thanks so much! >> >> Perl >> 5 Optimizing Compiler, RPerl v1.0 >> RPerl can help your low-magic Perl 5 code run up to 200 times faster than >> pure Perl, with full backw... >> >> Voir la publication sur Facebook· Modifier >> les paramètres de courrier électronique· Vous pouvez répondre à ce message pour commenter. >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From creaktive em gmail.com Wed Nov 27 21:24:05 2013 From: creaktive em gmail.com (Stanislaw Pusep) Date: Thu, 28 Nov 2013 06:24:05 +0100 Subject: [Rio-pm] RPerl - Austin.pm In-Reply-To: References: Message-ID: Não tem, mas Reini Urban estava trabalhando nisso... Mas acho que acabou virando outra coisa. ???????, 28 ?????? 2013 ?. ???????????? Tiago Peczenyj ?????: > Aliás, Perl tem JIT optimization? > Le 27 nov. 2013 22:43, "Tiago Peczenyj" > > a écrit : > > Não é impossível, uma vez que você remova algum overhead por exemplo. > Entretanto vc vai sacrificar alguma coisa. De repente vc vai ter menos > features. Vai sacrificar backward compatibility ,etc. > > Depende do seu gargalo. Se for I/O pode não fazer a menor diferença ser > 200x mais rápido. > Le 27 nov. 2013 15:35, "Aureliano Guedes" a > écrit : > > 200 vezes mais rapido que Puro Perl??? > Parece ilusão > > ------------------------------ > Date: Wed, 27 Nov 2013 05:39:02 -0200 > From: jc em joaocoutinho.com.br > To: rio-pm em pm.org > Subject: [Rio-pm] RPerl - Austin.pm > > Repassando, da fan page do FB. > [ ]'s, > João > > ---------- Forwarded message ---------- > From: "Will Braswell" > Date: Nov 26, 2013 9:50 PM > Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the > President of... > To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> > > Will Braswell a publié dans Rio de Janeiro Perl Mongers > [image: Will Braswell] Will > Braswell 26 > novembre 21:50 > Hello Perl friends, I'm the President of http://Austin.pm/, > we're working to finish RPerl v1.0, will you please consider making a > pledge to support the project? > Thanks so much! > > > > -- ?????????? ? ????? iPhone -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From lpacheco em estantevirtual.com.br Thu Nov 28 12:08:36 2013 From: lpacheco em estantevirtual.com.br (Leonardo Pacheco) Date: Thu, 28 Nov 2013 18:08:36 -0200 Subject: [Rio-pm] Digest Rio-pm, volume 105, assunto 23 In-Reply-To: References: Message-ID: http://rperl.org/faq.html > Q: What is RPerl? > A: RPerl is a computer programming language, based on the popular Perl 5 programming language. RPerl gives software developers a compiler to make their apps run really fast on parallel computing platforms like multi-core processors, the cloud, clusters, and supercomputers. RPerl stands for Restricted Perl, in that we restrict our use of Perl to those parts which can be made to run fast. RPerl also stands for Revolutionary Perl, in that we hope RPerl's speed will revolutionize the software development industry. RPerl might even stand for Roadrunner Perl, in that it RUNS REALLY FAST. > > (?) > Q: How fast does RPerl code run? > A: Early hand-compiled tests show the potential to run RPerl apps about 7x faster than normal Perl 5 when using Perl data structures, and up to 200x faster when using C++ data structures. This does not include any fancy optimization techniques which could add even more speed in the future. -- Ph'nglui mglw'nafh Cthulhu R'lyeh wgah'nagl fhtagn On 28/11/2013, at 18:00, rio-pm-request em pm.org wrote: > Enviar submissões para a lista de discussão Rio-pm para > rio-pm em pm.org > > Para se cadastrar ou descadastrar via WWW, visite o endereço > http://mail.pm.org/mailman/listinfo/rio-pm > ou, via email, envie uma mensagem com a palavra 'help' no assunto ou > corpo da mensagem para > rio-pm-request em pm.org > > Você poderá entrar em contato com a pessoa que gerencia a lista pelo > endereço > rio-pm-owner em pm.org > > Quando responder, por favor edite sua linha Assunto assim ela será > mais específica que "Re: Contents of Rio-pm digest..." > > > Tópicos de Hoje: > > 1. Re: RPerl - Austin.pm (Stanislaw Pusep) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Thu, 28 Nov 2013 06:24:05 +0100 > From: Stanislaw Pusep > To: Perl Mongers Rio de Janeiro > Subject: Re: [Rio-pm] RPerl - Austin.pm > Message-ID: > > Content-Type: text/plain; charset="utf-8" > > Não tem, mas Reini Urban estava trabalhando nisso... Mas acho que acabou > virando outra coisa. > > ???????, 28 ?????? 2013 ?. ???????????? Tiago Peczenyj ?????: > >> Aliás, Perl tem JIT optimization? >> Le 27 nov. 2013 22:43, "Tiago Peczenyj" > >> a écrit : >> >> Não é impossível, uma vez que você remova algum overhead por exemplo. >> Entretanto vc vai sacrificar alguma coisa. De repente vc vai ter menos >> features. Vai sacrificar backward compatibility ,etc. >> >> Depende do seu gargalo. Se for I/O pode não fazer a menor diferença ser >> 200x mais rápido. >> Le 27 nov. 2013 15:35, "Aureliano Guedes" a >> écrit : >> >> 200 vezes mais rapido que Puro Perl??? >> Parece ilusão >> >> ------------------------------ >> Date: Wed, 27 Nov 2013 05:39:02 -0200 >> From: jc em joaocoutinho.com.br >> To: rio-pm em pm.org >> Subject: [Rio-pm] RPerl - Austin.pm >> >> Repassando, da fan page do FB. >> [ ]'s, >> João >> >> ---------- Forwarded message ---------- >> From: "Will Braswell" >> Date: Nov 26, 2013 9:50 PM >> Subject: [Rio de Janeiro Perl Mongers] Hello Perl friends, I'm the >> President of... >> To: "Rio de Janeiro Perl Mongers" <20431022699 em groups.facebook.com> >> >> Will Braswell a publié dans Rio de Janeiro Perl Mongers >> [image: Will Braswell] Will >> Braswell 26 >> novembre 21:50 >> Hello Perl friends, I'm the President of http://Austin.pm/, >> we're working to finish RPerl v1.0, will you please consider making a >> pledge to support the project? >> Thanks so much! >> >> >> >> > > -- > ?????????? ? ????? iPhone > -------------- Próxima Parte ---------- > Um anexo em HTML foi limpo... > URL: > > ------------------------------ > > Subject: Legenda do Digest > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > ------------------------------ > > Fim da Digest Rio-pm, volume 105, assunto 23 > ******************************************** -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Dec 2 06:44:16 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 2 Dec 2013 14:44:16 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BDUVIDA-DISCUSS=C3O=5D_Perl6=3A_o_que_h?= =?iso-8859-1?q?=E1_de_novo=3F?= Message-ID: Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu lançamento??É uma versão desenvolvida pela comunidade, certo? Então será que não falta pulso firme e/ou uma empresa que invista nisso?Será que vai ficar só na ideia, e se tornar um mito da programação ou virá ser real?O que sabem sobre? Valeu! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From dan.vinciguerra em gmail.com Mon Dec 2 07:45:25 2013 From: dan.vinciguerra em gmail.com (Daniel Vinciguerra) Date: Mon, 2 Dec 2013 13:45:25 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BDUVIDA-DISCUSS=C3O=5D_Perl6=3A_o_que_h?= =?iso-8859-1?q?=E1_de_novo=3F?= In-Reply-To: References: Message-ID: Referencia interessante sobre as features nos atuais projetos de VMs de Perl 6 http://perl6.org/compilers/features Podemos ver que já estamos com o projeto Rakudo em um estagio bem interessante! []'s *Daniel Vinciguerra* Web Solutions Architect and Co-Owner at Bivee http://github.com/dvinciguerra 2013/12/2 Aureliano Guedes > Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu > lançamento?? > É uma versão desenvolvida pela comunidade, certo? Então será que não falta > pulso firme e/ou uma empresa que invista nisso? > Será que vai ficar só na ideia, e se tornar um mito da programação ou virá > ser real? > O que sabem sobre? > > Valeu! > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leprevostfv em gmail.com Mon Dec 2 07:47:02 2013 From: leprevostfv em gmail.com (Felipe da Veiga Leprevost) Date: Mon, 02 Dec 2013 13:47:02 -0200 Subject: [Rio-pm] =?utf-8?q?=5BDUVIDA-DISCUSS=C3=83O=5D_Perl6=3A_o_que_h?= =?utf-8?b?w6EgZGUgbm92bz8=?= In-Reply-To: References: Message-ID: <1385999222.32731.54495837.6552CD60@webmail.messagingengine.com> Você pode acompanhar o Advent Calendar do Perl 6 para ver as novidades, aproveita que começou ontem com um post sobre o estado da linguagem. [1]http://perl6advent.wordpress.com/ On Mon, Dec 2, 2013, at 12:44 PM, Aureliano Guedes wrote: Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu lançamento?? É uma versão desenvolvida pela comunidade, certo? Então será que não falta pulso firme e/ou uma empresa que invista nisso? Será que vai ficar só na ideia, e se tornar um mito da programação ou virá ser real? O que sabem sobre? Valeu! _______________________________________________ Rio-pm mailing list [2]Rio-pm em pm.org [3]http://mail.pm.org/mailman/listinfo/rio-pm -- Felipe da Veiga Leprevost [4]www.leprevost.com.br Laboratory for Proteomics and Protein Engineering. Fiocruz, Brazil. References 1. http://perl6advent.wordpress.com/ 2. mailto:Rio-pm em pm.org 3. http://mail.pm.org/mailman/listinfo/rio-pm 4. http://www.leprevost.com.br/ -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Mon Dec 2 13:26:00 2013 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Mon, 2 Dec 2013 21:26:00 +0000 Subject: [Rio-pm] =?iso-8859-1?q?=5BDUVIDA-DISCUSS=C3O=5D_Perl6=3A_o_que_h?= =?iso-8859-1?q?=E1_de_novo=3F?= In-Reply-To: <1385999222.32731.54495837.6552CD60@webmail.messagingengine.com> References: , <1385999222.32731.54495837.6552CD60@webmail.messagingengine.com> Message-ID: Serio mesmo??Perl6 vai virar Java??Pelo menos esse formato de declarar classes é identico. From: leprevostfv em gmail.com To: rio-pm em pm.org Date: Mon, 2 Dec 2013 13:47:02 -0200 Subject: Re: [Rio-pm] [DUVIDA-DISCUSSÃO] Perl6: o que há de novo? Você pode acompanhar o Advent Calendar do Perl 6 para ver as novidades, aproveita que começou ontem com um post sobre o estado da linguagem. http://perl6advent.wordpress.com/ On Mon, Dec 2, 2013, at 12:44 PM, Aureliano Guedes wrote: Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu lançamento??É uma versão desenvolvida pela comunidade, certo? Então será que não falta pulso firme e/ou uma empresa que invista nisso? Será que vai ficar só na ideia, e se tornar um mito da programação ou virá ser real? O que sabem sobre? Valeu! _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Felipe da Veiga Leprevost www.leprevost.com.br Laboratory for Proteomics and Protein Engineering. Fiocruz, Brazil. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Tue Dec 3 10:59:40 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Tue, 3 Dec 2013 16:59:40 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BDUVIDA-DISCUSS=C3O=5D_Perl6=3A_o_que_h?= =?iso-8859-1?q?=E1_de_novo=3F?= In-Reply-To: References: <1385999222.32731.54495837.6552CD60@webmail.messagingengine.com> Message-ID: virar java? ta mais pra virar Scala, com uma capacidade de metaprogração monstra. 2013/12/2 Aureliano Guedes > Serio mesmo?? > Perl6 vai virar Java?? > Pelo menos esse formato de declarar classes é identico. > > > ------------------------------ > From: leprevostfv em gmail.com > To: rio-pm em pm.org > Date: Mon, 2 Dec 2013 13:47:02 -0200 > Subject: Re: [Rio-pm] [DUVIDA-DISCUSSÃO] Perl6: o que há de novo? > > > Você pode acompanhar o Advent Calendar do Perl 6 para ver as novidades, > aproveita que começou ontem com um post sobre o estado da linguagem. > > http://perl6advent.wordpress.com/ > > > > On Mon, Dec 2, 2013, at 12:44 PM, Aureliano Guedes wrote: > > Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu > lançamento?? > É uma versão desenvolvida pela comunidade, certo? Então será que não falta > pulso firme e/ou uma empresa que invista nisso? > Será que vai ficar só na ideia, e se tornar um mito da programação ou > virá ser real? > O que sabem sobre? > > Valeu! > *_______________________________________________* > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > -- > Felipe da Veiga Leprevost > www.leprevost.com.br > Laboratory for Proteomics and Protein Engineering. > Fiocruz, Brazil. > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From andregarciacarneiro em gmail.com Tue Dec 3 11:09:56 2013 From: andregarciacarneiro em gmail.com (Andre Carneiro) Date: Tue, 3 Dec 2013 17:09:56 -0200 Subject: [Rio-pm] =?iso-8859-1?q?=5BDUVIDA-DISCUSS=C3O=5D_Perl6=3A_o_que_h?= =?iso-8859-1?q?=E1_de_novo=3F?= In-Reply-To: References: <1385999222.32731.54495837.6552CD60@webmail.messagingengine.com> Message-ID: Que triste pensar assim! É quase como dizer que Java == C++ pelo mesmo motivo! :-p 2013/12/2 Aureliano Guedes > Serio mesmo?? > Perl6 vai virar Java?? > Pelo menos esse formato de declarar classes é identico. > > > ------------------------------ > From: leprevostfv em gmail.com > To: rio-pm em pm.org > Date: Mon, 2 Dec 2013 13:47:02 -0200 > Subject: Re: [Rio-pm] [DUVIDA-DISCUSSÃO] Perl6: o que há de novo? > > > Você pode acompanhar o Advent Calendar do Perl 6 para ver as novidades, > aproveita que começou ontem com um post sobre o estado da linguagem. > > http://perl6advent.wordpress.com/ > > > > On Mon, Dec 2, 2013, at 12:44 PM, Aureliano Guedes wrote: > > Após 10 anos da proposta, se não me engano, o que há de novo quanto ao seu > lançamento?? > É uma versão desenvolvida pela comunidade, certo? Então será que não falta > pulso firme e/ou uma empresa que invista nisso? > Será que vai ficar só na ideia, e se tornar um mito da programação ou virá > ser real? > O que sabem sobre? > > Valeu! > *_______________________________________________* > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > -- > Felipe da Veiga Leprevost > www.leprevost.com.br > Laboratory for Proteomics and Protein Engineering. > Fiocruz, Brazil. > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- André Garcia Carneiro Software Engineer (11)982907780 -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From breno em rio.pm.org Tue Dec 10 15:03:50 2013 From: breno em rio.pm.org (breno) Date: Tue, 10 Dec 2013 21:03:50 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ Message-ID: Oi povo, essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( Vamos bebemorar? Meu voto é pra Rua Alice! []s -b From tiago.peczenyj em gmail.com Tue Dec 10 15:10:38 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Tue, 10 Dec 2013 21:10:38 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: Je veux aller à la rue alice Le 10 déc. 2013 21:04, "breno" a écrit : > Oi povo, > > essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( > > Vamos bebemorar? Meu voto é pra Rua Alice! > > []s > > -b > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From bruno.buss em gmail.com Tue Dec 10 15:39:47 2013 From: bruno.buss em gmail.com (Bruno Buss) Date: Tue, 10 Dec 2013 21:39:47 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: Garu, Meu voto vai para a Rua do Rio no Nova América... Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra disso? :P 2013/12/10 breno > Oi povo, > > essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( > > Vamos bebemorar? Meu voto é pra Rua Alice! > > []s > > -b > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Bruno C. Buss http://www.brunobuss.net -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From marciodesouzaferreira em gmail.com Tue Dec 10 18:13:29 2013 From: marciodesouzaferreira em gmail.com (Marcio Ferreira) Date: Wed, 11 Dec 2013 00:13:29 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: 301 pra semana que vem nem pensar? Em 10 de dezembro de 2013 21:39, Bruno Buss escreveu: > Garu, > > Meu voto vai para a Rua do Rio no Nova América... > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra > disso? :P > > > > 2013/12/10 breno > >> Oi povo, >> >> essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( >> >> Vamos bebemorar? Meu voto é pra Rua Alice! >> >> []s >> >> -b >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From viniciusmiasato em gmail.com Wed Dec 11 09:49:04 2013 From: viniciusmiasato em gmail.com (=?ISO-8859-1?Q?Vin=EDcius_Miasato?=) Date: Wed, 11 Dec 2013 15:49:04 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: eu acho que vai chover ... abs. Japa Em 11 de dezembro de 2013 00:13, Marcio Ferreira < marciodesouzaferreira em gmail.com> escreveu: > 301 pra semana que vem nem pensar? > > > Em 10 de dezembro de 2013 21:39, Bruno Buss escreveu: > > Garu, >> >> Meu voto vai para a Rua do Rio no Nova América... >> Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra >> disso? :P >> >> >> >> 2013/12/10 breno >> >>> Oi povo, >>> >>> essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( >>> >>> Vamos bebemorar? Meu voto é pra Rua Alice! >>> >>> []s >>> >>> -b >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Bruno C. Buss >> http://www.brunobuss.net >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From perl em mosconi.mat.br Wed Dec 11 09:54:46 2013 From: perl em mosconi.mat.br (Rodrigo Mosconi (perl)) Date: Wed, 11 Dec 2013 15:54:46 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: nesta quinta não poderei ir terei prova Em 11 de dezembro de 2013 15:49, Vinícius Miasato escreveu: > eu acho que vai chover ... > > abs. > Japa > > > Em 11 de dezembro de 2013 00:13, Marcio Ferreira < > marciodesouzaferreira em gmail.com> escreveu: > > 301 pra semana que vem nem pensar? >> >> >> Em 10 de dezembro de 2013 21:39, Bruno Buss escreveu: >> >> Garu, >>> >>> Meu voto vai para a Rua do Rio no Nova América... >>> Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra >>> disso? :P >>> >>> >>> >>> 2013/12/10 breno >>> >>>> Oi povo, >>>> >>>> essa quinta, 12 de dezembro, é a última segunda quinta do ano :-( >>>> >>>> Vamos bebemorar? Meu voto é pra Rua Alice! >>>> >>>> []s >>>> >>>> -b >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>> >>> >>> >>> -- >>> Bruno C. Buss >>> http://www.brunobuss.net >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From oainikusama em gmail.com Wed Dec 11 10:03:30 2013 From: oainikusama em gmail.com (breno) Date: Wed, 11 Dec 2013 16:03:30 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: 2013/12/10 Bruno Buss : > Garu, > > Meu voto vai para a Rua do Rio no Nova América... > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra > disso? :P > Foi o que eu disse, Rua do Rio no Nova América! Vocês que entenderam errado :P []s -b From nuba em fastmail.fm Wed Dec 11 13:07:02 2013 From: nuba em fastmail.fm (Nuba Princigalli) Date: Wed, 11 Dec 2013 19:07:02 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: Message-ID: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> Oba! Sugiro algum lugar na zona sul, de preferência algum que não tenha alagado hoje, pro caso de chover... Hoje cedo, nas Barcas, os taxis estavam se recusando a ir pra zona norte e alguns lugares do centro, e vi agora de tarde, a coisa estava mesmo feia: http://riowaterplanet.tumblr.com Abraço, Nuba On Wed, Dec 11, 2013, at 04:03 PM, breno wrote: > 2013/12/10 Bruno Buss : > > Garu, > > > > Meu voto vai para a Rua do Rio no Nova América... > > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra > > disso? :P > > > > Foi o que eu disse, Rua do Rio no Nova América! Vocês que entenderam > errado :P > > []s > > -b > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson From fernandocorrea em gmail.com Thu Dec 12 02:39:40 2013 From: fernandocorrea em gmail.com (Fernando Correa) Date: Thu, 12 Dec 2013 08:39:40 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> References: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> Message-ID: Eu voto no informalzinho de Copa: Rua Francisco Otaviano, 67 Copacabana Rio De Janeiro - RJ 22080-040 Brasil de: Nuba Princigalli Nuba Princigalli Responder: Perl Mongers Rio de Janeiro rio-pm em pm.org Data: 11 de dezembro de 2013 at 19:07:09 Para: rio-pm em pm.org rio-pm em pm.org Assunto:  Re: [Rio-pm] Encontro Social de Dezembro \o/ Oba! Sugiro algum lugar na zona sul, de preferência algum que não tenha alagado hoje, pro caso de chover... Hoje cedo, nas Barcas, os taxis estavam se recusando a ir pra zona norte e alguns lugares do centro, e vi agora de tarde, a coisa estava mesmo feia: http://riowaterplanet.tumblr.com Abraço, Nuba On Wed, Dec 11, 2013, at 04:03 PM, breno wrote: > 2013/12/10 Bruno Buss : > > Garu, > > > > Meu voto vai para a Rua do Rio no Nova América... > > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, lembra > > disso? :P > > > > Foi o que eu disse, Rua do Rio no Nova América! Vocês que entenderam > errado :P > > []s > > -b > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Thu Dec 12 02:53:20 2013 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Thu, 12 Dec 2013 08:53:20 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> Message-ID: Bom, dessa vez não vou prometer nada. Infelizmente ta foda de sair do recreio com essa chuva. 2013/12/12 Fernando Correa > Eu voto no informalzinho de Copa: > > > Rua Francisco Otaviano, 67 > > Copacabana > > Rio De Janeiro - RJ > > 22080-040 > > Brasil > ------------------------------ > de: Nuba Princigalli Nuba Princigalli > Responder: Perl Mongers Rio de Janeiro rio-pm em pm.org > Data: 11 de dezembro de 2013 at 19:07:09 > Para: rio-pm em pm.org rio-pm em pm.org > Assunto: Re: [Rio-pm] Encontro Social de Dezembro \o/ > > Oba! > > Sugiro algum lugar na zona sul, de preferência algum que não tenha > alagado hoje, pro caso de chover... > > Hoje cedo, nas Barcas, os taxis estavam se recusando a ir pra zona norte > e alguns lugares do centro, e vi agora de tarde, a coisa estava mesmo > feia: http://riowaterplanet.tumblr.com > > Abraço, > > Nuba > > On Wed, Dec 11, 2013, at 04:03 PM, breno wrote: > > 2013/12/10 Bruno Buss : > > > Garu, > > > > > > Meu voto vai para a Rua do Rio no Nova América... > > > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, > lembra > > > disso? :P > > > > > br/>> FFoi o que eu disse, Rua do Rio no Nova América! Vocês que > entenderam > > errado :P > > br/>> [[]s > > br/>> -b < > > _______________________________________________ > > Rio-pm mailing list > > Rio-pm em pm.org > > http://mail.pm.org/mailman/listinfo/rio-pm > > > -- br/>Nuba R. Princigalli nuba@@pauleira.com http://pauleira.combr/>@@nprincigalli > Discipline is not an end in itself, just a means to an end. - King > Crimson > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://about.me/peczenyj -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From blabos em gmail.com Thu Dec 12 06:47:55 2013 From: blabos em gmail.com (Blabos de Blebe) Date: Thu, 12 Dec 2013 12:47:55 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> Message-ID: Eu voto na Barra 2013/12/12 Tiago Peczenyj > Bom, dessa vez não vou prometer nada. > > Infelizmente ta foda de sair do recreio com essa chuva. > > > 2013/12/12 Fernando Correa > >> Eu voto no informalzinho de Copa: >> >> >> Rua Francisco Otaviano, 67 >> >> Copacabana >> >> Rio De Janeiro - RJ >> >> 22080-040 >> >> Brasil >> ------------------------------ >> de: Nuba Princigalli Nuba Princigalli >> Responder: Perl Mongers Rio de Janeiro rio-pm em pm.org >> Data: 11 de dezembro de 2013 at 19:07:09 >> Para: rio-pm em pm.org rio-pm em pm.org >> Assunto: Re: [Rio-pm] Encontro Social de Dezembro \o/ >> >> Oba! >> >> Sugiro algum lugar na zona sul, de preferência algum que não tenha >> alagado hoje, pro caso de chover... >> >> Hoje cedo, nas Barcas, os taxis estavam se recusando a ir pra zona norte >> e alguns lugares do centro, e vi agora de tarde, a coisa estava mesmo >> feia: http://riowaterplanet.tumblr.com >> >> Abraço, >> >> Nuba >> >> On Wed, Dec 11, 2013, at 04:03 PM, breno wrote: >> > 2013/12/10 Bruno Buss : >> > > Garu, >> > > >> > > Meu voto vai para a Rua do Rio no Nova América... >> > > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, >> lembra >> > > disso? :P >> > > >> > br/>> FFoi o que eu disse, Rua do Rio no Nova América! Vocês que >> entenderam >> > errado :P >> > br/>> [[]s >> > br/>> -b < >> > _______________________________________________ >> > Rio-pm mailing list >> > Rio-pm em pm.org >> > http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> -- br/>Nuba R. Princigalli nuba@@pauleira.com http://pauleira.combr/>@@nprincigalli >> Discipline is not an end in itself, just a means to an end. - King >> Crimson >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://about.me/peczenyj > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From oainikusama em gmail.com Thu Dec 12 09:55:51 2013 From: oainikusama em gmail.com (breno) Date: Thu, 12 Dec 2013 15:55:51 -0200 Subject: [Rio-pm] Encontro Social de Dezembro \o/ In-Reply-To: References: <1386796022.5898.58481313.174823E7@webmail.messagingengine.com> Message-ID: Bom, já que cada um votou num lugar diferente e não temos consenso, aviso que estarei lá na Rua do Rio, no Nova América. Tem metrô que deixa dentro do shopping, e quem quiser me acompanhar pra tomar @bebidas será muito bem-vindo(a)! []s -b 2013/12/12 Blabos de Blebe : > Eu voto na Barra > > > 2013/12/12 Tiago Peczenyj >> >> Bom, dessa vez não vou prometer nada. >> >> Infelizmente ta foda de sair do recreio com essa chuva. >> >> >> 2013/12/12 Fernando Correa >>> >>> Eu voto no informalzinho de Copa: >>> >>> >>> Rua Francisco Otaviano, 67 >>> >>> Copacabana >>> >>> Rio De Janeiro - RJ >>> >>> 22080-040 >>> >>> Brasil >>> >>> ________________________________ >>> de: Nuba Princigalli Nuba Princigalli >>> Responder: Perl Mongers Rio de Janeiro rio-pm em pm.org >>> Data: 11 de dezembro de 2013 at 19:07:09 >>> Para: rio-pm em pm.org rio-pm em pm.org >>> Assunto: Re: [Rio-pm] Encontro Social de Dezembro \o/ >>> >>> Oba! >>> >>> Sugiro algum lugar na zona sul, de preferência algum que não tenha >>> alagado hoje, pro caso de chover... >>> >>> Hoje cedo, nas Barcas, os taxis estavam se recusando a ir pra zona norte >>> e alguns lugares do centro, e vi agora de tarde, a coisa estava mesmo >>> feia: http://riowaterplanet.tumblr.com >>> >>> Abraço, >>> >>> Nuba >>> >>> On Wed, Dec 11, 2013, at 04:03 PM, breno wrote: >>> > 2013/12/10 Bruno Buss : >>> > > Garu, >>> > > >>> > > Meu voto vai para a Rua do Rio no Nova América... >>> > > Afinal, você também tem que estar lá pra ver a estreia do Hobbit, >>> > > lembra >>> > > disso? :P >>> > > >>> > br/>> FFoi o que eu disse, Rua do Rio no Nova América! Vocês que >>> > entenderam >>> > errado :P >>> > br/>> [[]s >>> > br/>> -b < >>> > _______________________________________________ >>> > Rio-pm mailing list >>> > Rio-pm em pm.org >>> > http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> -- br/>Nuba R. Princigalli nuba@@pauleira.com http://pauleira.com >>> br/>@@nprincigalli >>> Discipline is not an end in itself, just a means to an end. - King >>> Crimson >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://about.me/peczenyj >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm From nuba em fastmail.fm Thu Dec 19 09:35:30 2013 From: nuba em fastmail.fm (Nuba Princigalli) Date: Thu, 19 Dec 2013 15:35:30 -0200 Subject: [Rio-pm] Fwd: [SP-pm] Perl White Camel Message-ID: <1387474530.15178.61637045.439BD660@webmail.messagingengine.com> Pessoal, passando adiante a notícia, muito legal! Perl Community: Thiago "maluco" Rondon If you're doing Perl in Brasil, you probably know "maluco". Not only does he run multiple business with heavy doses of Perl, but he was the leader of the [1]São Paulo Perl mongersand the organizer of the Brasilian versions of the Perl Advent calendars, called [2]Equinócio, which the local community runs twice a year. He's also the creator of [3]OpenData-BR, which uses Perl to illuminate government spending data. Fonte: [4]blogs.perl.org/users/brian_d_foy/2013/12/the-2013-white-camel s.html Parabéns Maluco! :) ----- Original message ----- From: Solli Honorio <[5]shonorio em gmail.com> To: "[6]saopaulo-pm em mail.pm.org" <[7]saopaulo-pm em mail.pm.org> Subject: [SP-pm] Perl White Camel Date: Thu, 19 Dec 2013 08:43:02 -0200 Pessoal, É com enorme orgulho que anuncio na lista que o nosso colega Thiago Rodon, mais conhecido como maluco, teve os esforços reconhecido mais uma vez e recebeu o título de Perl White Camel. É o segundo ano consecutivo que o Brasil é tem representante no Perl White Camel, ano passado foi o Breno. Maculo aproveite mais este título e pode gastar os milhões da premiação com cerveja para o grupo. Solli Honorio -- "o animal satisfeito dorme". - Guimarães Rosa =begin disclaimer Sao Paulo Perl Mongers: [8]http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: [9]SaoPaulo-pm em pm.org L<[10]http://mail.pm.org/mailman/listinfo/saopaulo-pm> =end disclaimer -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson References 1. http://sao-paulo.pm.org/principal 2. http://sao-paulo.pm.org/equinocio/2013/mar/ 3. https://github.com/thiagorondon/OpenData-BR 4. http://blogs.perl.org/users/brian_d_foy/2013/12/the-2013-white-camels.html 5. mailto:shonorio em gmail.com 6. mailto:saopaulo-pm em mail.pm.org 7. mailto:saopaulo-pm em mail.pm.org 8. http://sao-paulo.pm.org/ 9. mailto:SaoPaulo-pm em pm.org 10. http://mail.pm.org/mailman/listinfo/saopaulo-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guilhermeareal+riopm em gmail.com Thu Dec 19 17:46:56 2013 From: guilhermeareal+riopm em gmail.com (Guilherme Alves) Date: Fri, 20 Dec 2013 10:46:56 +0900 Subject: [Rio-pm] Fwd: [SP-pm] Perl White Camel In-Reply-To: <1387474530.15178.61637045.439BD660@webmail.messagingengine.com> References: <1387474530.15178.61637045.439BD660@webmail.messagingengine.com> Message-ID: Parabéns para os dois! WC 2012 e WC 2013! On Fri, Dec 20, 2013 at 2:35 AM, Nuba Princigalli wrote: > Pessoal, passando adiante a notícia, muito legal! > > Perl Community: Thiago "maluco" Rondon > > If you're doing Perl in Brasil, you probably know "maluco". Not only does he > run multiple business with heavy doses of Perl, but he was the leader of the > São Paulo Perl mongersand the organizer of the Brasilian versions of the > Perl Advent calendars, called Equinócio, which the local community runs > twice a year. He's also the creator of OpenData-BR, which uses Perl to > illuminate government spending data. > > Fonte: blogs.perl.org/users/brian_d_foy/2013/12/the-2013-white-camels.html > > Parabéns Maluco! :) > > ----- Original message ----- > From: Solli Honorio > To: "saopaulo-pm em mail.pm.org" > Subject: [SP-pm] Perl White Camel > Date: Thu, 19 Dec 2013 08:43:02 -0200 > > Pessoal, > > É com enorme orgulho que anuncio na lista que o nosso colega Thiago Rodon, > mais conhecido como maluco, teve os esforços reconhecido mais uma vez e > recebeu o título de Perl White Camel. > > É o segundo ano consecutivo que o Brasil é tem representante no Perl White > Camel, ano passado foi o Breno. > > Maculo aproveite mais este título e pode gastar os milhões da premiação com > cerveja para o grupo. > > Solli Honorio > > -- > "o animal satisfeito dorme". - Guimarães Rosa > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org > L > =end disclaimer > > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm -- Guilherme Alves