From joenio em gmail.com Sat Dec 1 19:43:04 2007 From: joenio em gmail.com (Joenio Costa) Date: Sun, 2 Dec 2007 00:43:04 -0300 Subject: [Cascavel-pm] OFF - Ler arquivo com caracter \M In-Reply-To: <154598.51946.qm@web31308.mail.mud.yahoo.com> References: <154598.51946.qm@web31308.mail.mud.yahoo.com> Message-ID: <65934b450712011943n636833d2kd2b28eaaaa19a2ee@mail.gmail.com> Tenta usar o gvim http://www.vim.org/download.php#pc Em 29/11/07, Patty Silva escreveu: > > Pessoal.. no WINDOWS tem como eu abrir o arquivo e visualizar os caracteres > como o \M que os editores colocam??? > > Obrigada > > > ________________________________ > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- Joenio Costa - Salvador Perl Mongers - Grupo de Usuário Perl de Salvador - Colibre - Cooperativa de Tecnologias Livres - PSL-BA - Projeto Software Livre Bahia From wendelscardua em gmail.com Sun Dec 2 07:14:34 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Sun, 2 Dec 2007 13:14:34 -0200 Subject: [Cascavel-pm] BBC cria "Perl on Rails" Message-ID: <726229b50712020714j44c0ecdavc77107c5fbc19494@mail.gmail.com> Via Slashdot: http://developers.slashdot.org/article.pl?sid=07/12/01/1320221 Perl + Ruby on Rails = Perl on Rails pergunta: eles nunca ouviram falar de Catalyst !? []s Wendel From acid06 em gmail.com Sun Dec 2 08:48:14 2007 From: acid06 em gmail.com (Nilson Santos Figueiredo Junior) Date: Sun, 2 Dec 2007 14:48:14 -0200 Subject: [Cascavel-pm] BBC cria "Perl on Rails" In-Reply-To: <726229b50712020714j44c0ecdavc77107c5fbc19494@mail.gmail.com> References: <726229b50712020714j44c0ecdavc77107c5fbc19494@mail.gmail.com> Message-ID: <9a08c9b40712020848s5d64a1ffr149f2ceebc467823@mail.gmail.com> On Dec 2, 2007 1:14 PM, Wendel Scardua wrote: > pergunta: eles nunca ouviram falar de Catalyst !? Nos comentários eles explicam porque não utilizaram Catalyst. Eles precisavam que o sistema pudesse rodar até em Perl 5.6 e que não utilizasse muitas dependências da CPAN pois todos os módulos deveriam ser aprovados pela BBC antes da instalação. Eles já utilizam Catalyst para outros projetos. -Nilson Santos F. Jr. From otaviof em gmail.com Sun Dec 2 09:44:39 2007 From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=) Date: Sun, 2 Dec 2007 15:44:39 -0200 Subject: [Cascavel-pm] OFF - Ler arquivo com caracter \M In-Reply-To: <65934b450712011943n636833d2kd2b28eaaaa19a2ee@mail.gmail.com> References: <154598.51946.qm@web31308.mail.mud.yahoo.com> <65934b450712011943n636833d2kd2b28eaaaa19a2ee@mail.gmail.com> Message-ID: <8e3843570712020944i365e0cf8xbfba032ffcf5bbc@mail.gmail.com> Patty, Apenas completando a dica do Joenio. Para que o Vim te mostre os terminadores de linha vc deve dar um: : set list Atenciosamente, -- | -- | Otávio Fernandes < otaviof | gmail | com > | FreeBSD 7.0 BETA3 && GNU/Linux User: 283.396 | (( Especial Programação )) http://geekbr.podcastbrasil.com/ | -- From shonorio em gmail.com Sun Dec 2 17:39:31 2007 From: shonorio em gmail.com (Solli Honorio) Date: Sun, 2 Dec 2007 23:39:31 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?Acompanhe_o_calend=E1rio?= Message-ID: <12d1f4ee0712021739w68985423kfe88a26a8aac5383@mail.gmail.com> Pessoal está disponível o 'Catalyst Advent Calendar' ( http://catalyst.perl.org/calendar/2007) com um artigo para cada dia do mês dezenbro, já o 'Perl Advent Calendar' (http://perladvent.pm.org/) ainda está a procura de voluntários para escrever os artigos. Abraços, Solli M. Honório -- "o animal satisfeito dorme". - Guimarães Rosa -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071202/8072379e/attachment.html From ptfzs em yahoo.com.br Mon Dec 3 01:51:06 2007 From: ptfzs em yahoo.com.br (Patty Silva) Date: Mon, 3 Dec 2007 01:51:06 -0800 (PST) Subject: [Cascavel-pm] Res: OFF - Ler arquivo com caracter \M Message-ID: <924678.63926.qm@web31311.mail.mud.yahoo.com> Obrigada Dica muito útil :D ----- Mensagem original ---- De: Otávio Fernandes Para: Cascavel Perl Mongers Enviadas: Domingo, 2 de Dezembro de 2007 17:44:39 Assunto: Re: [Cascavel-pm] OFF - Ler arquivo com caracter \M Patty, Apenas completando a dica do Joenio. Para que o Vim te mostre os terminadores de linha vc deve dar um: : set list Atenciosamente, -- | -- | Otávio Fernandes < otaviof | gmail | com > | FreeBSD 7.0 BETA3 && GNU/Linux User: 283.396 | (( Especial Programação )) http://geekbr.podcastbrasil.com/ | -- _______________________________________________ Cascavel-pm mailing list Cascavel-pm em pm.org http://mail.pm.org/mailman/listinfo/cascavel-pm Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071203/26bfb69e/attachment.html From joenio em gmail.com Mon Dec 3 06:36:03 2007 From: joenio em gmail.com (Joenio Costa) Date: Mon, 3 Dec 2007 11:36:03 -0300 Subject: [Cascavel-pm] =?iso-8859-1?q?Acompanhe_o_calend=E1rio?= In-Reply-To: <12d1f4ee0712021739w68985423kfe88a26a8aac5383@mail.gmail.com> References: <12d1f4ee0712021739w68985423kfe88a26a8aac5383@mail.gmail.com> Message-ID: <65934b450712030636w57f6c978y755af5c57465e729@mail.gmail.com> Ano passado rolou movimentação para traduzir os posts: http://mail.pm.org/pipermail/cascavel-pm/2006-December/007691.html Mas parece que somente um post foi traduzido pelo Adriano, infelizmente :( Inclusive, acho que seria interessante colocar essa tradução no Perl.org.br na seção de artigos. Será que este ano nós não conseguiriamos um resultado melhor que o ano passado? Em 02/12/07, Solli Honorio escreveu: > Pessoal está disponível o 'Catalyst Advent Calendar' > (http://catalyst.perl.org/calendar/2007) com um artigo para > cada dia do mês dezenbro, já o 'Perl Advent Calendar' ( > http://perladvent.pm.org/) ainda está a procura de voluntários para escrever > os artigos. > > Abraços, > > Solli M. Honório > > -- > "o animal satisfeito dorme". - Guimarães Rosa > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- Joenio Costa - Salvador Perl Mongers - Grupo de Usuário Perl de Salvador - Colibre - Cooperativa de Tecnologias Livres - PSL-BA - Projeto Software Livre Bahia From joenio em gmail.com Mon Dec 3 06:38:35 2007 From: joenio em gmail.com (Joenio Costa) Date: Mon, 3 Dec 2007 11:38:35 -0300 Subject: [Cascavel-pm] =?iso-8859-1?q?Acompanhe_o_calend=E1rio?= In-Reply-To: <65934b450712030636w57f6c978y755af5c57465e729@mail.gmail.com> References: <12d1f4ee0712021739w68985423kfe88a26a8aac5383@mail.gmail.com> <65934b450712030636w57f6c978y755af5c57465e729@mail.gmail.com> Message-ID: <65934b450712030638y53c2dd28s2e5ca3fe0833bf16@mail.gmail.com> Corrigindo, Ano passado a traducao foi para o Perl Advent Calendar. Mas a proposta de traducao (para o Perl ou Catalyst) ainda tá valendo... Em 03/12/07, Joenio Costa escreveu: > Ano passado rolou movimentação para traduzir os posts: > > http://mail.pm.org/pipermail/cascavel-pm/2006-December/007691.html > > Mas parece que somente um post foi traduzido pelo Adriano, infelizmente :( > Inclusive, acho que seria interessante colocar essa tradução no > Perl.org.br na seção de artigos. > > Será que este ano nós não conseguiriamos um resultado melhor que o ano passado? > > > > Em 02/12/07, Solli Honorio escreveu: > > Pessoal está disponível o 'Catalyst Advent Calendar' > > (http://catalyst.perl.org/calendar/2007) com um artigo para > > cada dia do mês dezenbro, já o 'Perl Advent Calendar' ( > > http://perladvent.pm.org/) ainda está a procura de voluntários para escrever > > os artigos. > > > > Abraços, > > > > Solli M. Honório > > > > -- > > "o animal satisfeito dorme". - Guimarães Rosa > > _______________________________________________ > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > -- > Joenio Costa > - Salvador Perl Mongers - Grupo de Usuário Perl de Salvador > - Colibre - Cooperativa de Tecnologias Livres > - PSL-BA - Projeto Software Livre Bahia > -- Joenio Costa - Salvador Perl Mongers - Grupo de Usuário Perl de Salvador - Colibre - Cooperativa de Tecnologias Livres - PSL-BA - Projeto Software Livre Bahia From glasswalk3r em hotmail.com Mon Dec 3 13:25:41 2007 From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior) Date: Tue, 4 Dec 2007 00:25:41 +0300 Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit Message-ID: Olá monges, Estou tentando fazer um conjunto de módulos que gerem código Perl utilizando o Template Toolkit. Na realidade eu tenho dois problemas: um é definir se estou usando o Template Toolkit de forma correta. O outro é lidar com o __DATA__ em uma hierarquia de classes. Depois de testar meus modelos feitos com TT, eu cheguei a conclusão que definir o local aonde os templates ficam localizados não é tão interessante assim: eu teria que usar um arquivo de configuração ou algo parecido. Eu resolvi definir um pacote e dentro desse pacote colocar as linhas de código do template. Assim eu poderia utilizar o próprio @INC para buscar pelos meus templates (não preciso me preocupar com performance por fazer essa busca nesse momento). O TT já implementa isso de alguma outra forma? O outro problema foi justamente tentar usar __DATA__. Como o conjunto de métodos eram todos iguais para minhas classes-template, eu resolvi criar uma superclasse e colocar os métodos todos lá da seguinte forma: package File::Validate::Template; use strict; use warnings; use base 'Class::Accessor'; use Carp qw(confess); __PACKAGE__->follow_best_practice(); __PACKAGE__->mk_ro_accessors(qw(code)); sub new { my $class = shift; confess "class is an obligatory parameter" unless ( defined($class) ); my $self = { code => undef }; bless $self, $class; $self->{code} = $self->_read_code(); return $self; } sub _read_code { my $self = shift; my $buffer; local $/; my $handle = ref($self) . '::DATA'; $buffer = <$handle>; confess "No data from $handle file handle" unless ( defined($buffer) ); return \$buffer; } 1; Nas subclasses eu simplesmente herdei da superclasse e defini alguma coisa depois de __DATA__. Mas isso não está funcionando nem com reza brava. O resultado é esse aqui se tento executar: C:\temp\File-Layout>gentest.pl -i ContactPhones.xml No data from File::Validate::Template::Basic::DATA file handle at File/Validate/Template.pm line 37 File::Validate::Template::_read_code('File::Validate::Template::Basic=HASH(0x1df4610)') called at File/Validate/Template.pm line 20 File::Validate::Template::new('File::Validate::Template::Basic') called at File/Validate/Field/Varchar.pm line 31 File::Validate::Field::Varchar::new('File::Validate::Field::Varchar', 'File::Validate::Field::Varchar=HASH(0x1c234f8)') called at C:\temp\File-Layout\gentest.pl line 106 main::generate_test('HASH(0x1bae6f4)') called at C:\temp\File-Layout\gentest.pl line 43 Eu tive que usar um pouco da tabela de símbolos para definir em tempo de execução em qual __DATA__ eu quero ler. Eu tentei com arquivo de teste usando my $handle = 'Test::DATA'; my $test = <$handle>; e funcionou conforme o esperado. Aonde estou errando? Obrigado a todos, --- Alceu Rodrigues de Freitas Junior glasswalk3r em hotmail.com "Escolha um trabalho que você ama e você nunca mais terá que trabalhar um dia na sua vida" - Confúcio _________________________________________________________________ Explore the seven wonders of the world http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/d2efd023/attachment.html From donatoaz em gmail.com Mon Dec 3 13:28:32 2007 From: donatoaz em gmail.com (Donato Azevedo) Date: Mon, 3 Dec 2007 19:28:32 -0200 Subject: [Cascavel-pm] Ferramenta para Formatar HTML com TT2 In-Reply-To: <8e3843570711290223t3523dd8dkcee53c9373ac0e3e@mail.gmail.com> References: <8e3843570711290223t3523dd8dkcee53c9373ac0e3e@mail.gmail.com> Message-ID: <1746e3e30712031328w7f86ce30nc8da541f973fae48@mail.gmail.com> On Nov 29, 2007 8:23 AM, Otávio Fernandes wrote: > Senhores, > > Peço a indicação de vocês para uma ferramenta, ou script, para > formatar os meus fontes HTML's os quais tem linhas de TT2 (Template > Toolkit), com as ferramentas que eu testei, o TT2 fica completamente > bagunçado. Aproveitando um pouco o assunto, alguem tem um arquivo de syntax highlighting com suporte a TT pro vim? -- Donato Azevedo From otaviof em gmail.com Mon Dec 3 13:58:39 2007 From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=) Date: Mon, 3 Dec 2007 19:58:39 -0200 Subject: [Cascavel-pm] Ferramenta para Formatar HTML com TT2 In-Reply-To: <1746e3e30712031328w7f86ce30nc8da541f973fae48@mail.gmail.com> References: <8e3843570711290223t3523dd8dkcee53c9373ac0e3e@mail.gmail.com> <1746e3e30712031328w7f86ce30nc8da541f973fae48@mail.gmail.com> Message-ID: <8e3843570712031358m36f19836wf63347940e2ef937@mail.gmail.com> Donato, Bem lembrado. Uso TT2 já faz quase um ano, e sempre usei a formatacao padrao do html, agora que vi o seu post, resolvi testar uma conf para isso :-) segue: http://www.vim.org/scripts/script.php?script_id=830 Porem, eu fiz um tema para o GVim, veja se te agrada: http://www.vim.org/scripts/script.php?script_id=2016 ate mais, -- | -- | Otávio Fernandes < otaviof | gmail | com > | FreeBSD 7.0 BETA4 && GNU/Linux User: 283.396 | (( Especial Programação )) http://geekbr.podcastbrasil.com/ | -- From veronica.soara em gmail.com Tue Dec 4 03:50:32 2007 From: veronica.soara em gmail.com (Veronica Soraia) Date: Tue, 4 Dec 2007 09:50:32 -0200 Subject: [Cascavel-pm] Perl em Windows Message-ID: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli rsrsrsr !?! rs Estou com um problema ... preciso rodar o perl em Windows, só que ele terá uma interface gráfica e por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia por onde posso começar, será usando o módulo de GTK no Perl ??? falou galerinha até maisssssss.... Vlw -- VERONICA SORAIA -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/e4ac238d/attachment.html From fernandocorrea em gmail.com Tue Dec 4 03:57:13 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 09:57:13 -0200 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Message-ID: Um bom começo: http://search.cpan.org/~ni-s/Tk-804.027/pod/overview.pod http://search.cpan.org/~karasik/Prima-1.23/Prima.pm http://search.cpan.org/~mlehmann/Gtk-Perl-0.7009/Gtk/objects.pod etc... Em 04/12/07, Veronica Soraia escreveu: > > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli > rsrsrsr !?! rs > > Estou com um problema ... > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia > por onde posso começar, será usando o módulo de GTK no Perl ??? > > falou galerinha até maisssssss.... > > Vlw > > -- > VERONICA SORAIA > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/837b38d2/attachment.html From frederico em gmail.com Tue Dec 4 04:01:07 2007 From: frederico em gmail.com (Frederico Recsky) Date: Tue, 4 Dec 2007 10:01:07 -0200 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Message-ID: <88fe68ee0712040401t265d5817n41562692df03338c@mail.gmail.com> Olá! On Dec 4, 2007 9:50 AM, Veronica Soraia wrote: > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli > rsrsrsr !?! rs Há, você tava na minha palestra :P. Estou com um problema ... > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia > por onde posso começar, será usando o módulo de GTK no Perl ??? Um bom comećo é isso aqui: http://www.linux-magazine.com/issue/42/Perl_Screen_Scrapers.pdf É para linux, porém deveria funcionar no windows com ajustes ou instalando o gtk no windows, etc... -- ____________________________ Frederico Recsky Linux User: #253572 http://www.fred.eti.br http://www.perl.org.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/d6cddbe0/attachment-0001.html From edencardim em gmail.com Tue Dec 4 06:43:13 2007 From: edencardim em gmail.com (eden) Date: Tue, 4 Dec 2007 11:43:13 -0300 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Message-ID: <3de55ead0712040643i736ee357w6f7f31ac1fbc0bf1@mail.gmail.com> On Dec 4, 2007 8:50 AM, Veronica Soraia wrote: > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli rsrsrsr > !?! rs > > Estou com um problema ... > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e por > trás dessa interface vai rodar um processamento. Alguem tem alguma ideia por > onde posso começar, será usando o módulo de GTK no Perl ??? > > falou galerinha até maisssssss.... Tem o wxPerl também, que é cross-platform. http://wxperl.sourceforge.net/sshot01.html http://search.cpan.org/~mbarbon/Wx-0.80/Wx.pm -- edenc.vox.com From breno em rio.pm.org Tue Dec 4 07:13:36 2007 From: breno em rio.pm.org (breno) Date: Tue, 4 Dec 2007 12:13:36 -0300 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <3de55ead0712040643i736ee357w6f7f31ac1fbc0bf1@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> <3de55ead0712040643i736ee357w6f7f31ac1fbc0bf1@mail.gmail.com> Message-ID: Ou, caso esteja interessada em desenvolvimento rápido e pouca portabilidade (e.g. um programa apenas para Windows) pode experimentar o "GUI Loft". Nunca usei mas parece muito bom! Tem um ambiente WYSIWYG estilo VB/Delphi, que permite vc criar suas janelas rapidamente. http://www.darserman.com/Perl/Loft/ Independente de sua escolha, não deixe de compartilhar suas experiências! []s -b On Dec 4, 2007 11:43 AM, eden wrote: > On Dec 4, 2007 8:50 AM, Veronica Soraia wrote: > > > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli rsrsrsr > > !?! rs > > > > Estou com um problema ... > > > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e por > > trás dessa interface vai rodar um processamento. Alguem tem alguma ideia por > > onde posso começar, será usando o módulo de GTK no Perl ??? > > > > falou galerinha até maisssssss.... > > Tem o wxPerl também, que é cross-platform. > > http://wxperl.sourceforge.net/sshot01.html > http://search.cpan.org/~mbarbon/Wx-0.80/Wx.pm > > -- > edenc.vox.com > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > From nferraz em gmail.com Tue Dec 4 08:12:24 2007 From: nferraz em gmail.com (Nelson Ferraz) Date: Tue, 4 Dec 2007 16:12:24 +0000 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <88fe68ee0712040401t265d5817n41562692df03338c@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> <88fe68ee0712040401t265d5817n41562692df03338c@mail.gmail.com> Message-ID: <604cec170712040812o3640142cn2c9eaf13e965d2e9@mail.gmail.com> > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia > por onde posso começar, será usando o módulo de GTK no Perl ??? Com relação à interface gráfica, dê uma olhada no módulo Wx. Mas procure começar o desenvolvimento *sem* interface gráfica. Se você começar a trabalhar nessa parte agora, vai perder muito tempo fazendo ajustes visuais, e perder o foco do essencial. Você pode nos explicar melhor a essência do seu problema, e não a parte da apresentação? From luismottacampos em yahoo.co.uk Tue Dec 4 08:30:41 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:30:41 +0100 Subject: [Cascavel-pm] [OT] Programa de bloqueio para empresas In-Reply-To: References: <00cc01c832a2$d6a111f0$0901a8c0@servidorliz> <9a08c9b40711290844p6bbe4447jd78512b05d1520ae@mail.gmail.com> Message-ID: <475580B1.6060909@yahoo.co.uk> Lorn wrote: > > Às vezes, conversar com os funcionários na empresa pode funcionar > > melhor que qualquer uma dessas medidas, afinal, é fácil contornar > > qualquer uma delas (um simples servidor proxy fura o bloqueio). > > Nilson, um simples servidor de proxy só fura o bloqueio se o usuario > poder acessar a internet fora do proxy :) Eh verdade. Mas, se voce por exemplo nao pode bloquear acesso SSH, e o usuario tem uma maquina fora da rede, ele pode ter um proxy do lado de fora e fazer port fowarding atravez de SSH. ;) Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Tue Dec 4 08:36:50 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:36:50 +0100 Subject: [Cascavel-pm] [OT] Programa de bloqueio para empresas In-Reply-To: <00b201c832ba$0565e990$0901a8c0@servidorliz> References: <00cc01c832a2$d6a111f0$0901a8c0@servidorliz> <9a08c9b40711290844p6bbe4447jd78512b05d1520ae@mail.gmail.com> <00b201c832ba$0565e990$0901a8c0@servidorliz> Message-ID: <47558222.6070404@yahoo.co.uk> fernandolouis em terra.com.br wrote: > Com certeza amigo... uma boa conversa tem mais eficiência que qualquer > software. > > Vou dar uma olhada nesse squid. Sem querer bater muito forte, mas isto foi dos maiores oximoros que eu jah vi ateh hoje... Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Tue Dec 4 08:37:50 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:37:50 +0100 Subject: [Cascavel-pm] [OT] Programa de bloqueio para empresas In-Reply-To: <9a08c9b40711291202h3c0eccbdu7c648c4c1438c2ad@mail.gmail.com> References: <00cc01c832a2$d6a111f0$0901a8c0@servidorliz> <9a08c9b40711290844p6bbe4447jd78512b05d1520ae@mail.gmail.com> <9a08c9b40711291054v7fa7d6f2re9d7b65c0f7ca742@mail.gmail.com> <9a08c9b40711291202h3c0eccbdu7c648c4c1438c2ad@mail.gmail.com> Message-ID: <4755825E.6010200@yahoo.co.uk> Nilson Santos Figueiredo Junior wrote: > On Nov 29, 2007 5:40 PM, Marcio Ferreira wrote: >> Nada que uma analise do relatório de acesso gerado pelo proxy não te >> forneça. ;-) > > Aí a pessoa usa outro servidor proxy. E outro. E outro. Ou alguma > outra forma de burlar o esquema. > > Enfim... medidas puramente tecnológicas não são adequadas pra resolver > esse tipo de problema. > > Uma pessoa que fica abusando e orkut ou MSN provavelmente não vai ser > produtiva, logo, não fará muita falta pra empresa. Manda a pessoa > embora e deixa claro pros outros funcionários o porquê de sua > demissão. Depois disso, ao invés de bloquear, registre tudo em um log > e faça estatísticas. Coloque no quadro de avisos da empresa os > "Funcionários que mais usaram orkut no mês" pra deixar claro que vocês > sabem tudo o que eles estão fazendo e é melhor tomarem cuidado. > > Existem tantas idéias melhores que simplesmente bloquear. Isso eh terrorismo. Acho que uma solucao de compromisso eh melhor... Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Tue Dec 4 08:45:53 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:45:53 +0100 Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit In-Reply-To: References: Message-ID: <47558441.1040009@yahoo.co.uk> Alceu Rodrigues de Freitas Junior wrote: > Olá monges, > > Estou tentando fazer um conjunto de módulos que gerem código Perl > utilizando o Template Toolkit. Na realidade eu tenho dois problemas: um > é definir se estou usando o Template Toolkit de forma correta. O outro é > lidar com o __DATA__ em uma hierarquia de classes. > > Depois de testar meus modelos feitos com TT, eu cheguei a conclusão que > definir o local aonde os templates ficam localizados não é tão > interessante assim: eu teria que usar um arquivo de configuração ou algo > parecido. Eu resolvi definir um pacote e dentro desse pacote colocar as > linhas de código do template. Assim eu poderia utilizar o próprio @INC > para buscar pelos meus templates (não preciso me preocupar com > performance por fazer essa busca nesse momento). O TT já implementa isso > de alguma outra forma? > > O outro problema foi justamente tentar usar __DATA__. Como o conjunto de > métodos eram todos iguais para minhas classes-template, eu resolvi criar > uma superclasse e colocar os métodos todos lá da seguinte forma: > > package File::Validate::Template; > > use strict; > use warnings; > use base 'Class::Accessor'; > use Carp qw(confess); > > __PACKAGE__->follow_best_practice(); > __PACKAGE__->mk_ro_accessors(qw(code)); > > sub new { > > my $class = shift; > confess "class is an obligatory parameter" unless ( defined($class) ); > > my $self = { code => undef }; > > bless $self, $class; > > $self->{code} = $self->_read_code(); > > return $self; > > } > > sub _read_code { > > my $self = shift; > my $buffer; > > local $/; > > my $handle = ref($self) . '::DATA'; > $buffer = <$handle>; > > confess "No data from $handle file handle" unless ( defined($buffer) ); > > return \$buffer; > > } > > 1; > > Nas subclasses eu simplesmente herdei da superclasse e defini alguma > coisa depois de __DATA__. Mas isso não está funcionando nem com reza > brava. O resultado é esse aqui se tento executar: > > C:\temp\File-Layout>gentest.pl -i ContactPhones.xml > No data from File::Validate::Template::Basic::DATA file handle at > File/Validate/Template.pm line 37 > > File::Validate::Template::_read_code('File::Validate::Template::Basic=HASH(0x1df4610)') > called at File/Validate/Template.pm line 20 > File::Validate::Template::new('File::Validate::Template::Basic') > called at File/Validate/Field/Varchar.pm line 31 > > File::Validate::Field::Varchar::new('File::Validate::Field::Varchar', > 'File::Validate::Field::Varchar=HASH(0x1c234f8)') called at > C:\temp\File-Layout\gentest.pl line 106 > main::generate_test('HASH(0x1bae6f4)') called at > C:\temp\File-Layout\gentest.pl line 43 > > Eu tive que usar um pouco da tabela de símbolos para definir em tempo de > execução em qual __DATA__ eu quero ler. Eu tentei com arquivo de teste > usando > > my $handle = 'Test::DATA'; > my $test = <$handle>; > > e funcionou conforme o esperado. > > Aonde estou errando? Ahn... Alceu, isto estah... assim... um pouco abstrato demais, nao? Que tal mais um pouco de informacao objetiva sobre o teu problema? Onde estah o codigo do TT que voce disse que estava usando? Voce alguma vez tentou falar com o Nelson Ferraz sobre ou olhou o AppML? Putamplexos interessados! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Tue Dec 4 08:47:42 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:47:42 +0100 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <604cec170712040812o3640142cn2c9eaf13e965d2e9@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> <88fe68ee0712040401t265d5817n41562692df03338c@mail.gmail.com> <604cec170712040812o3640142cn2c9eaf13e965d2e9@mail.gmail.com> Message-ID: <475584AE.3070908@yahoo.co.uk> Nelson Ferraz wrote: >> preciso rodar o perl em Windows, só que ele terá uma interface gráfica e >> por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia >> por onde posso começar, será usando o módulo de GTK no Perl ??? > > Com relação à interface gráfica, dê uma olhada no módulo Wx. > > Mas procure começar o desenvolvimento *sem* interface gráfica. Se você > começar a trabalhar nessa parte agora, vai perder muito tempo fazendo > ajustes visuais, e perder o foco do essencial. > > Você pode nos explicar melhor a essência do seu problema, e não a > parte da apresentação? Boa, Nelson. Focando na engenharia, o problema fica menor. ;) Eu concordo e apoio. -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Tue Dec 4 08:41:27 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Tue, 04 Dec 2007 17:41:27 +0100 Subject: [Cascavel-pm] Duvida Foreach In-Reply-To: <9a08c9b40711291750s1d2288b2teac524d693486659@mail.gmail.com> References: <344851.23524.qm@web31305.mail.mud.yahoo.com> <8ff2963a0711291621y62e59ffcw90e35dd8b069ec82@mail.gmail.com> <9a08c9b40711291750s1d2288b2teac524d693486659@mail.gmail.com> Message-ID: <47558337.4000108@yahoo.co.uk> Nilson Santos Figueiredo Junior wrote: > On Nov 29, 2007 10:21 PM, Joao Gabriel C. Laass wrote: >> O primeiro joga o resultado em "$_" e o segundo em "$teste". > > É isso mesmo. > Mas o recomendado para ter suas variáveis no escopo preciso seria: > > foreach my $teste (@array) { } > > Particularmente, eu gosto de usar a forma reduzida: > > for my $teste (@array) { } > > É raro usar um for C-style. Mesmo para iteradores numéricos, prefiro usar: > > for my $i (0..$x) { } > Um comentario apenas: esta forma eh a menos eficiente em termos de memoria. se voce vai usar o formato do C, entao "abraca o capeta": for ( my $i = 0 ; $i <= $x; $i++ ) {} Esta eh a forma que melhor administra a tua memoria. isso faz diferenca especialmente quando teus intervalos de numeros sao grandes. De qualquer forma, voce sempre pode usar um closure para construir um iterador... ;) Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From fernandesrp em yahoo.com Tue Dec 4 09:20:20 2007 From: fernandesrp em yahoo.com (Rodrigo Fernandes) Date: Tue, 4 Dec 2007 09:20:20 -0800 (PST) Subject: otimização em manipulação de texto Message-ID: <645915.21652.qm@web44809.mail.sp1.yahoo.com> Caros Monges(jas), Tenho um programa que executa muitas localização e substituições em arquivos plain text, através das divinas expressões regulares. Basicamente, abro o arquivo, coloco o conteúdo numa array através do operador diamante, pesquiso linha-a-linha o meu fenômeno. Quando encontrado, modifico-o, volto a salvar em disco e inicio tudo novamente. Bem, Perl é uma ótima linguagem, principalmente, para mim, por eu não precisar declarar todas as variáveis, mas Perl não deve ser à prova de estupidez, e acho que meu código está um pouquinho estúpido. Gostaria de saber a melhor forma de otimizá-lo. Acredito que um caminho seria fazer todas as alterações e salvar em disco apenas no final. Porém, meus dados, eventualemnte, podem chegar a 500 Mb e centenas de arquivos plain text, ou MUITO mais. Há alguma forma "perlniana" de automatizar o fluxo memória/disco para fins de otimização? Algo que monitore a quantidade de memória necessária e decida onde os dados serão armazenados. Ou nada disto é necessário? Abraço, R. Fernandes PS.: Também pensei em colocar tudo em BDlite e fazer as manipulações (substituições) através desta framework. ____________________________________________________________________________________ Be a better sports nut! Let your teams follow you with Yahoo Mobile. Try it now. http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ From fernandesrp em yahoo.com Tue Dec 4 09:15:37 2007 From: fernandesrp em yahoo.com (Rodrigo Fernandes) Date: Tue, 4 Dec 2007 09:15:37 -0800 (PST) Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Message-ID: <248423.48455.qm@web44813.mail.sp1.yahoo.com> Verônica, Não digo que isto seja melhor ou pior do que as demais dicas, mas comigo funciona, e rápido: http://search.cpan.org/~gaas/Tkx-1.04/Tkx.pm http://search.cpan.org/~gaas/Tkx-1.04/Tkx/Tutorial.pod []s Rodrigo Fernandes www.nes.ufsc.br --- Veronica Soraia wrote: > Oi galera.. tudo bem ?? será que alguem lembra de > mim lá no Conisli rsrsrsr > !?! rs > > Estou com um problema ... > > preciso rodar o perl em Windows, só que ele terá uma > interface gráfica e por > trás dessa interface vai rodar um processamento. > Alguem tem alguma ideia por > onde posso começar, será usando o módulo de GTK no > Perl ??? > > falou galerinha até maisssssss.... > > Vlw > > -- > VERONICA SORAIA > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm ____________________________________________________________________________________ Looking for last minute shopping deals? Find them fast with Yahoo! Search. http://tools.search.yahoo.com/newsearch/category.php?category=shopping From veronica.soara em gmail.com Tue Dec 4 09:39:23 2007 From: veronica.soara em gmail.com (Veronica Soraia) Date: Tue, 4 Dec 2007 15:39:23 -0200 Subject: [Cascavel-pm] Digest Cascavel-pm, volume 226, assunto 3 In-Reply-To: References: Message-ID: <8ed2dfc0712040939v601786b9w159511ab0a6459a3@mail.gmail.com> Nelson Ferraz wrote: >> preciso rodar o perl em Windows, só que ele terá uma interface gráfica e >> por trás dessa interface vai rodar um processamento. Alguem tem alguma ideia >> por onde posso começar, será usando o módulo de GTK no Perl ??? > > Com relação à interface gráfica, dê uma olhada no módulo Wx. > > Mas procure começar o desenvolvimento *sem* interface gráfica. Se você > começar a trabalhar nessa parte agora, vai perder muito tempo fazendo > ajustes visuais, e perder o foco do essencial. > > Você pode nos explicar melhor a essência do seu problema, e não a > parte da apresentação? Olá .. muito obrigada pelas dicas... então o desenvolvimento do software ja está feito.. rodando no Unix perfeitamente , agora temos que portar esse sofware para rodar na plataforma Windows, seria tipo uma integração, da interface e esse software ja existente..... Abraços... _________ Veronica Em 04/12/07, cascavel-pm-request em pm.org escreveu: > > Enviar submissões para a lista de discussão Cascavel-pm para > cascavel-pm em pm.org > > Para se cadastrar ou descadastrar via WWW, visite o endereço > http://mail.pm.org/mailman/listinfo/cascavel-pm > ou, via email, envie uma mensagem com a palavra 'help' no assunto ou > corpo da mensagem para > cascavel-pm-request em pm.org > > Você poderá entrar em contato com a pessoa que gerencia a lista pelo > endereço > cascavel-pm-owner em pm.org > > Quando responder, por favor edite sua linha Assunto assim ela será > mais específica que "Re: Contents of Cascavel-pm digest..." > > > Tópicos de Hoje: > > 1. Re: Perl em Windows (eden) > 2. Re: Perl em Windows (breno) > 3. Re: Perl em Windows (Nelson Ferraz) > 4. Re: [OT] Programa de bloqueio para empresas (Luis Motta Campos) > 5. Re: [OT] Programa de bloqueio para empresas (Luis Motta Campos) > 6. Re: [OT] Programa de bloqueio para empresas (Luis Motta Campos) > 7. Re: uso de __DATA__ com hierarquia de classes e Template > Toolkit (Luis Motta Campos) > 8. Re: Perl em Windows (Luis Motta Campos) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Tue, 4 Dec 2007 11:43:13 -0300 > From: eden > Subject: Re: [Cascavel-pm] Perl em Windows > To: "Cascavel Perl Mongers" > Message-ID: > <3de55ead0712040643i736ee357w6f7f31ac1fbc0bf1 em mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > On Dec 4, 2007 8:50 AM, Veronica Soraia wrote: > > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli > rsrsrsr > > !?! rs > > > > Estou com um problema ... > > > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > por > > trás dessa interface vai rodar um processamento. Alguem tem alguma ideia > por > > onde posso começar, será usando o módulo de GTK no Perl ??? > > > > falou galerinha até maisssssss.... > > Tem o wxPerl também, que é cross-platform. > > http://wxperl.sourceforge.net/sshot01.html > http://search.cpan.org/~mbarbon/Wx-0.80/Wx.pm > > -- > edenc.vox.com > > > ------------------------------ > > Message: 2 > Date: Tue, 4 Dec 2007 12:13:36 -0300 > From: breno > Subject: Re: [Cascavel-pm] Perl em Windows > To: "Cascavel Perl Mongers" > Message-ID: > > Content-Type: text/plain; charset=ISO-8859-1 > > Ou, caso esteja interessada em desenvolvimento rápido e pouca > portabilidade (e.g. um programa apenas para Windows) pode experimentar > o "GUI Loft". Nunca usei mas parece muito bom! Tem um ambiente WYSIWYG > estilo VB/Delphi, que permite vc criar suas janelas rapidamente. > > http://www.darserman.com/Perl/Loft/ > > Independente de sua escolha, não deixe de compartilhar suas experiências! > > []s > > -b > > On Dec 4, 2007 11:43 AM, eden wrote: > > On Dec 4, 2007 8:50 AM, Veronica Soraia > wrote: > > > > > Oi galera.. tudo bem ?? será que alguem lembra de mim lá no Conisli > rsrsrsr > > > !?! rs > > > > > > Estou com um problema ... > > > > > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica > e por > > > trás dessa interface vai rodar um processamento. Alguem tem alguma > ideia por > > > onde posso começar, será usando o módulo de GTK no Perl ??? > > > > > > falou galerinha até maisssssss.... > > > > Tem o wxPerl também, que é cross-platform. > > > > http://wxperl.sourceforge.net/sshot01.html > > http://search.cpan.org/~mbarbon/Wx-0.80/Wx.pm > > > > -- > > edenc.vox.com > > > > _______________________________________________ > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > ------------------------------ > > Message: 3 > Date: Tue, 4 Dec 2007 16:12:24 +0000 > From: "Nelson Ferraz" > Subject: Re: [Cascavel-pm] Perl em Windows > To: "Cascavel Perl Mongers" > Message-ID: > <604cec170712040812o3640142cn2c9eaf13e965d2e9 em mail.gmail.com> > Content-Type: text/plain; charset=ISO-8859-1 > > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > > por trás dessa interface vai rodar um processamento. Alguem tem alguma > ideia > > por onde posso começar, será usando o módulo de GTK no Perl ??? > > Com relação à interface gráfica, dê uma olhada no módulo Wx. > > Mas procure começar o desenvolvimento *sem* interface gráfica. Se você > começar a trabalhar nessa parte agora, vai perder muito tempo fazendo > ajustes visuais, e perder o foco do essencial. > > Você pode nos explicar melhor a essência do seu problema, e não a > parte da apresentação? > > > ------------------------------ > > Message: 4 > Date: Tue, 04 Dec 2007 17:30:41 +0100 > From: Luis Motta Campos > Subject: Re: [Cascavel-pm] [OT] Programa de bloqueio para empresas > To: Cascavel Perl Mongers > Message-ID: <475580B1.6060909 em yahoo.co.uk> > Content-Type: text/plain; charset=ISO-8859-1 > > Lorn wrote: > > > Às vezes, conversar com os funcionários na empresa pode funcionar > > > melhor que qualquer uma dessas medidas, afinal, é fácil contornar > > > qualquer uma delas (um simples servidor proxy fura o bloqueio). > > > > Nilson, um simples servidor de proxy só fura o bloqueio se o usuario > > poder acessar a internet fora do proxy :) > > Eh verdade. Mas, se voce por exemplo nao pode bloquear acesso SSH, e o > usuario tem uma maquina fora da rede, ele pode ter um proxy do lado de > fora e fazer port fowarding atravez de SSH. ;) > > Putamplexos! > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} > > > > ------------------------------ > > Message: 5 > Date: Tue, 04 Dec 2007 17:36:50 +0100 > From: Luis Motta Campos > Subject: Re: [Cascavel-pm] [OT] Programa de bloqueio para empresas > To: Cascavel Perl Mongers > Message-ID: <47558222.6070404 em yahoo.co.uk> > Content-Type: text/plain; charset=ISO-8859-1 > > fernandolouis em terra.com.br wrote: > > Com certeza amigo... uma boa conversa tem mais eficiência que qualquer > > software. > > > > Vou dar uma olhada nesse squid. > > Sem querer bater muito forte, mas isto foi dos maiores oximoros que eu > jah vi ateh hoje... > > Putamplexos! > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} > > > > ------------------------------ > > Message: 6 > Date: Tue, 04 Dec 2007 17:37:50 +0100 > From: Luis Motta Campos > Subject: Re: [Cascavel-pm] [OT] Programa de bloqueio para empresas > To: Cascavel Perl Mongers > Message-ID: <4755825E.6010200 em yahoo.co.uk> > Content-Type: text/plain; charset=ISO-8859-1 > > Nilson Santos Figueiredo Junior wrote: > > On Nov 29, 2007 5:40 PM, Marcio Ferreira wrote: > >> Nada que uma analise do relatório de acesso gerado pelo proxy não te > >> forneça. ;-) > > > > Aí a pessoa usa outro servidor proxy. E outro. E outro. Ou alguma > > outra forma de burlar o esquema. > > > > Enfim... medidas puramente tecnológicas não são adequadas pra resolver > > esse tipo de problema. > > > > Uma pessoa que fica abusando e orkut ou MSN provavelmente não vai ser > > produtiva, logo, não fará muita falta pra empresa. Manda a pessoa > > embora e deixa claro pros outros funcionários o porquê de sua > > demissão. Depois disso, ao invés de bloquear, registre tudo em um log > > e faça estatísticas. Coloque no quadro de avisos da empresa os > > "Funcionários que mais usaram orkut no mês" pra deixar claro que vocês > > sabem tudo o que eles estão fazendo e é melhor tomarem cuidado. > > > > Existem tantas idéias melhores que simplesmente bloquear. > > Isso eh terrorismo. Acho que uma solucao de compromisso eh melhor... > > Putamplexos! > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} > > > > ------------------------------ > > Message: 7 > Date: Tue, 04 Dec 2007 17:45:53 +0100 > From: Luis Motta Campos > Subject: Re: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e > Template Toolkit > To: Cascavel Perl Mongers > Message-ID: <47558441.1040009 em yahoo.co.uk> > Content-Type: text/plain; charset=ISO-8859-1 > > Alceu Rodrigues de Freitas Junior wrote: > > Olá monges, > > > > Estou tentando fazer um conjunto de módulos que gerem código Perl > > utilizando o Template Toolkit. Na realidade eu tenho dois problemas: um > > é definir se estou usando o Template Toolkit de forma correta. O outro é > > lidar com o __DATA__ em uma hierarquia de classes. > > > > Depois de testar meus modelos feitos com TT, eu cheguei a conclusão que > > definir o local aonde os templates ficam localizados não é tão > > interessante assim: eu teria que usar um arquivo de configuração ou algo > > parecido. Eu resolvi definir um pacote e dentro desse pacote colocar as > > linhas de código do template. Assim eu poderia utilizar o próprio @INC > > para buscar pelos meus templates (não preciso me preocupar com > > performance por fazer essa busca nesse momento). O TT já implementa isso > > de alguma outra forma? > > > > O outro problema foi justamente tentar usar __DATA__. Como o conjunto de > > métodos eram todos iguais para minhas classes-template, eu resolvi criar > > uma superclasse e colocar os métodos todos lá da seguinte forma: > > > > package File::Validate::Template; > > > > use strict; > > use warnings; > > use base 'Class::Accessor'; > > use Carp qw(confess); > > > > __PACKAGE__->follow_best_practice(); > > __PACKAGE__->mk_ro_accessors(qw(code)); > > > > sub new { > > > > my $class = shift; > > confess "class is an obligatory parameter" unless ( defined($class) > ); > > > > my $self = { code => undef }; > > > > bless $self, $class; > > > > $self->{code} = $self->_read_code(); > > > > return $self; > > > > } > > > > sub _read_code { > > > > my $self = shift; > > my $buffer; > > > > local $/; > > > > my $handle = ref($self) . '::DATA'; > > $buffer = <$handle>; > > > > confess "No data from $handle file handle" unless ( defined($buffer) > ); > > > > return \$buffer; > > > > } > > > > 1; > > > > Nas subclasses eu simplesmente herdei da superclasse e defini alguma > > coisa depois de __DATA__. Mas isso não está funcionando nem com reza > > brava. O resultado é esse aqui se tento executar: > > > > C:\temp\File-Layout>gentest.pl -i ContactPhones.xml > > No data from File::Validate::Template::Basic::DATA file handle at > > File/Validate/Template.pm line 37 > > > > > File::Validate::Template::_read_code('File::Validate::Template::Basic=HASH(0x1df4610)') > > called at File/Validate/Template.pm line 20 > > File::Validate::Template::new('File::Validate::Template::Basic') > > called at File/Validate/Field/Varchar.pm line 31 > > > > File::Validate::Field::Varchar::new('File::Validate::Field::Varchar', > > 'File::Validate::Field::Varchar=HASH(0x1c234f8)') called at > > C:\temp\File-Layout\gentest.pl line 106 > > main::generate_test('HASH(0x1bae6f4)') called at > > C:\temp\File-Layout\gentest.pl line 43 > > > > Eu tive que usar um pouco da tabela de símbolos para definir em tempo de > > execução em qual __DATA__ eu quero ler. Eu tentei com arquivo de teste > > usando > > > > my $handle = 'Test::DATA'; > > my $test = <$handle>; > > > > e funcionou conforme o esperado. > > > > Aonde estou errando? > > Ahn... Alceu, isto estah... assim... um pouco abstrato demais, nao? > Que tal mais um pouco de informacao objetiva sobre o teu problema? > > Onde estah o codigo do TT que voce disse que estava usando? > > Voce alguma vez tentou falar com o Nelson Ferraz sobre ou olhou o AppML? > > Putamplexos interessados! > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} > > > > ------------------------------ > > Message: 8 > Date: Tue, 04 Dec 2007 17:47:42 +0100 > From: Luis Motta Campos > Subject: Re: [Cascavel-pm] Perl em Windows > To: Cascavel Perl Mongers > Message-ID: <475584AE.3070908 em yahoo.co.uk> > Content-Type: text/plain; charset=ISO-8859-1 > > Nelson Ferraz wrote: > >> preciso rodar o perl em Windows, só que ele terá uma interface gráfica > e > >> por trás dessa interface vai rodar um processamento. Alguem tem alguma > ideia > >> por onde posso começar, será usando o módulo de GTK no Perl ??? > > > > Com relação à interface gráfica, dê uma olhada no módulo Wx. > > > > Mas procure começar o desenvolvimento *sem* interface gráfica. Se você > > começar a trabalhar nessa parte agora, vai perder muito tempo fazendo > > ajustes visuais, e perder o foco do essencial. > > > > Você pode nos explicar melhor a essência do seu problema, e não a > > parte da apresentação? > > Boa, Nelson. Focando na engenharia, o problema fica menor. ;) Eu > concordo e apoio. > > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} > > > > ------------------------------ > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > > Fim da Digest Cascavel-pm, volume 226, assunto 3 > ************************************************ > -- VERONICA SORAIA -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/29ea80d8/attachment-0001.html From fernandocorrea em gmail.com Tue Dec 4 09:42:30 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 15:42:30 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <645915.21652.qm@web44809.mail.sp1.yahoo.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> Message-ID: perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo Em 04/12/07, Rodrigo Fernandes escreveu: > > Caros Monges(jas), > > Tenho um programa que executa muitas localização e > substituições em arquivos plain text, através das > divinas expressões regulares. > > Basicamente, abro o arquivo, coloco o conteúdo numa > array através do operador diamante, pesquiso > linha-a-linha o meu fenômeno. Quando encontrado, > modifico-o, volto a salvar em disco e inicio tudo > novamente. > > Bem, Perl é uma ótima linguagem, principalmente, para > mim, por eu não precisar declarar todas as variáveis, > mas Perl não deve ser à prova de estupidez, e acho que > meu código está um pouquinho estúpido. > > Gostaria de saber a melhor forma de otimizá-lo. > Acredito que um caminho seria fazer todas as > alterações e salvar em disco apenas no final. Porém, > meus dados, eventualemnte, podem chegar a 500 Mb e > centenas de arquivos plain text, ou MUITO mais. Há > alguma forma "perlniana" de automatizar o fluxo > memória/disco para fins de otimização? Algo que > monitore a quantidade de memória necessária e decida > onde os dados serão armazenados. Ou nada disto é > necessário? > > Abraço, > > R. Fernandes > > PS.: Também pensei em colocar tudo em BDlite e fazer > as manipulações (substituições) através desta > framework. > > > > > ____________________________________________________________________________________ > Be a better sports nut! Let your teams follow you > with Yahoo Mobile. Try it now. > http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/fc9d4b3e/attachment.html From nferraz em gmail.com Tue Dec 4 09:56:28 2007 From: nferraz em gmail.com (Nelson Ferraz) Date: Tue, 4 Dec 2007 17:56:28 +0000 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <645915.21652.qm@web44809.mail.sp1.yahoo.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> Message-ID: <604cec170712040956m7050fc03g209122059d0f6ed@mail.gmail.com> > Basicamente, abro o arquivo, coloco o conteúdo numa > array através do operador diamante, pesquiso > linha-a-linha o meu fenômeno. Quando encontrado, > modifico-o, volto a salvar em disco e inicio tudo > novamente. Se você estiver lidando com arquivos grandes, é melhor fazer as substituições linha a linha, ou parágrafo a parágrafo, do que carregá-lo inteiro na memória. Isto é: while ( my $line = <> ) { # do something with $line } > Bem, Perl é uma ótima linguagem, principalmente, para > mim, por eu não precisar declarar todas as variáveis, > mas Perl não deve ser à prova de estupidez, e acho que > meu código está um pouquinho estúpido. Você pode começar a torná-lo mais inteligente, se abrir mão do "não precisar declarar todas as variáveis". Ou seja: inclua um "use strict" e um "use warnings" no começo do seu programa. É bem provável que, quando você fizer isso, seu programa comece a apresentar mensagens de erro. É para isso que estas diretivas servem, para apontar os problemas, de forma que você possa corrigi-los. Portanto, comece os seus programas com: #!/usr/bin/perl use strict; use warnings; while ( my $line = <> ) { # ... } > Gostaria de saber a melhor forma de otimizá-lo. > Acredito que um caminho seria fazer todas as > alterações e salvar em disco apenas no final. Porém, > meus dados, eventualemnte, podem chegar a 500 Mb e > centenas de arquivos plain text, ou MUITO mais. Há > alguma forma "perlniana" de automatizar o fluxo > memória/disco para fins de otimização? Algo que > monitore a quantidade de memória necessária e decida > onde os dados serão armazenados. Ou nada disto é > necessário? Na minha opinião, é melhor lidar com pedaços menores de texto, ao invés de tentar colocar tudo na memória de uma vez. Se você nos contar que tipo de dados está lidando -- ou melhor ainda. se puder nos fornecer um exemplo -- talvez possamos ajudá-lo melhor. []s Nelson From fernandolouis em terra.com.br Tue Dec 4 10:32:00 2007 From: fernandolouis em terra.com.br (fernandolouis em terra.com.br) Date: Tue, 4 Dec 2007 16:32:00 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> Message-ID: <006801c836a3$f5a353b0$0401a8c0@servidorliz> Fernando não conhecia essa solução. Fiz o teste e me retornou o seguinte erro: Can´t do inplace edit without backup. Porque? []s, Fernando ----- Original Message ----- From: Fernando Oliveira To: Cascavel Perl Mongers Sent: Tuesday, December 04, 2007 3:42 PM Subject: Re: [Cascavel-pm]otimização em manipulação de texto perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/9a9442d9/attachment.html From fernandesrp em yahoo.com Tue Dec 4 10:37:49 2007 From: fernandesrp em yahoo.com (Rodrigo Fernandes) Date: Tue, 4 Dec 2007 10:37:49 -0800 (PST) Subject: [Cascavel-pm] otimização em manipulação de texto In-Reply-To: <006801c836a3$f5a353b0$0401a8c0@servidorliz> Message-ID: <985063.65508.qm@web44814.mail.sp1.yahoo.com> O mesmo comigo. Tentei acrescentar ".pak" depois de -i, como sugerido em http://www.thescripts.com/forum/thread49693.html, mas também não funcionou. R. Fernandes --- fernandolouis em terra.com.br wrote: > Fernando não conhecia essa solução. > Fiz o teste e me retornou o seguinte erro: Can´t do > inplace edit without backup. Porque? > > []s, > Fernando > ----- Original Message ----- > From: Fernando Oliveira > To: Cascavel Perl Mongers > Sent: Tuesday, December 04, 2007 3:42 PM > Subject: Re: [Cascavel-pm]otimização em > manipulação de texto > > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm ____________________________________________________________________________________ Looking for last minute shopping deals? Find them fast with Yahoo! Search. http://tools.search.yahoo.com/newsearch/category.php?category=shopping From fernandes em cpan.org Tue Dec 4 10:37:39 2007 From: fernandes em cpan.org (Rodrigo Panchiniak Fernandes) Date: Tue, 4 Dec 2007 10:37:39 -0800 (PST) Subject: [Cascavel-pm] otimização em manipulação de texto In-Reply-To: <006801c836a3$f5a353b0$0401a8c0@servidorliz> Message-ID: <732390.96475.qm@web44803.mail.sp1.yahoo.com> O mesmo comigo. Tentei acrescentar ".pak" depois de -i, como sugerido em http://www.thescripts.com/forum/thread49693.html, mas também não funcionou. R. Fernandes --- fernandolouis em terra.com.br wrote: > Fernando não conhecia essa solução. > Fiz o teste e me retornou o seguinte erro: Can´t do > inplace edit without backup. Porque? > > []s, > Fernando > ----- Original Message ----- > From: Fernando Oliveira > To: Cascavel Perl Mongers > Sent: Tuesday, December 04, 2007 3:42 PM > Subject: Re: [Cascavel-pm]otimização em > manipulação de texto > > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm ____________________________________________________________________________________ Be a better sports nut! Let your teams follow you with Yahoo Mobile. Try it now. http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ From fernandocorrea em gmail.com Tue Dec 4 10:44:10 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 16:44:10 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <006801c836a3$f5a353b0$0401a8c0@servidorliz> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <006801c836a3$f5a353b0$0401a8c0@servidorliz> Message-ID: vc está usando windows?! no windows, por algum motivo, ele não consegue fazer isso sem backup... basta fazer o seguinte: substitua o -i por -i.bkp(ou qq outro final de arquivo...) antes de substituir ele vai fazer uma cópia de backup... se o nome do seu arquivo era teste.txt, o backup vai ser teste.txt.bkp Em 04/12/07, fernandolouis em terra.com.br escreveu: > > Fernando não conhecia essa solução. > Fiz o teste e me retornou o seguinte erro: Can´t do inplace edit without > backup. Porque? > > []s, > Fernando > > ----- Original Message ----- > *From:* Fernando Oliveira > *To:* Cascavel Perl Mongers > *Sent:* Tuesday, December 04, 2007 3:42 PM > *Subject:* Re: [Cascavel-pm]otimização em manipulação de texto > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/41d265a7/attachment-0001.html From breno em rio.pm.org Tue Dec 4 10:52:50 2007 From: breno em rio.pm.org (breno) Date: Tue, 4 Dec 2007 15:52:50 -0300 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <732390.96475.qm@web44803.mail.sp1.yahoo.com> References: <006801c836a3$f5a353b0$0401a8c0@servidorliz> <732390.96475.qm@web44803.mail.sp1.yahoo.com> Message-ID: segundo perldoc perldiag: --------------------8<------------------ Can't do inplace edit without backup (F) You're on a system such as MSDOS that gets confused if you try reading from a deleted (but still opened) file. You have to say -i .bak, or some such. --------------------8<------------------ e testando aqui: --------------------8<------------------ Microsoft Windows XP [versão 5.1.2600] (C) Copyright 1985-2001 Microsoft Corp. C:\>perl -i -pe "s/plim/shazam/g" teste.txt Can't do inplace edit without backup. C:\>perl -i.bak -pe "s/plim/shazam/g" teste.txt C:\> --------------------8<------------------ (ok, dois arquivos (teste.txt e teste.txt.bak) e substituição feita com sucesso) Teria sido um problema de sintaxe no teste de vcs? Ou algo diferente? []s -b On Dec 4, 2007 3:37 PM, Rodrigo Panchiniak Fernandes wrote: > O mesmo comigo. Tentei acrescentar ".pak" depois de > -i, como sugerido em > http://www.thescripts.com/forum/thread49693.html, mas > também não funcionou. > > R. Fernandes > > --- fernandolouis em terra.com.br wrote: > > > > Fernando não conhecia essa solução. > > Fiz o teste e me retornou o seguinte erro: Can´t do > > inplace edit without backup. Porque? > > > > []s, > > Fernando > > ----- Original Message ----- > > From: Fernando Oliveira > > To: Cascavel Perl Mongers > > Sent: Tuesday, December 04, 2007 3:42 PM > > Subject: Re: [Cascavel-pm]otimização em > > manipulação de texto > > > > > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > > > _______________________________________________ > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > ____________________________________________________________________________________ > Be a better sports nut! Let your teams follow you > with Yahoo Mobile. Try it now. http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ > > _______________________________________________ > > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > From fernandesrp em yahoo.com Tue Dec 4 11:20:19 2007 From: fernandesrp em yahoo.com (Rodrigo Fernandes) Date: Tue, 4 Dec 2007 11:20:19 -0800 (PST) Subject: [Cascavel-pm] otimização em manipulação de texto In-Reply-To: Message-ID: <946301.77581.qm@web44808.mail.sp1.yahoo.com> Este problema foi resolvido! []s R. Fernandes --- breno wrote: > segundo perldoc perldiag: > > --------------------8<------------------ > Can't do inplace edit without backup > (F) You're on a system such as MSDOS that gets > confused if you try > reading from a deleted (but still opened) file. You > have to say -i > .bak, or some such. > --------------------8<------------------ > > e testando aqui: > > --------------------8<------------------ > Microsoft Windows XP [versão 5.1.2600] > (C) Copyright 1985-2001 Microsoft Corp. > > C:\>perl -i -pe "s/plim/shazam/g" teste.txt > Can't do inplace edit without backup. > > C:\>perl -i.bak -pe "s/plim/shazam/g" teste.txt > > C:\> > --------------------8<------------------ > (ok, dois arquivos (teste.txt e teste.txt.bak) e > substituição feita com sucesso) > > Teria sido um problema de sintaxe no teste de vcs? > Ou algo diferente? > > []s > > -b > > > > On Dec 4, 2007 3:37 PM, Rodrigo Panchiniak Fernandes > wrote: > > O mesmo comigo. Tentei acrescentar ".pak" depois > de > > -i, como sugerido em > > http://www.thescripts.com/forum/thread49693.html, > mas > > também não funcionou. > > > > R. Fernandes > > > > --- fernandolouis em terra.com.br wrote: > > > > > > > Fernando não conhecia essa solução. > > > Fiz o teste e me retornou o seguinte erro: Can´t > do > > > inplace edit without backup. Porque? > > > > > > []s, > > > Fernando > > > ----- Original Message ----- > > > From: Fernando Oliveira > > > To: Cascavel Perl Mongers > > > Sent: Tuesday, December 04, 2007 3:42 PM > > > Subject: Re: [Cascavel-pm]otimização em > > > manipulação de texto > > > > > > > > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' > arquivo > > > > > > > > _______________________________________________ > > > Cascavel-pm mailing list > > > Cascavel-pm em pm.org > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > ____________________________________________________________________________________ > > Be a better sports nut! Let your teams follow you > > with Yahoo Mobile. Try it now. > http://mobile.yahoo.com/sports;_ylt=At9_qDKvtAbMuh1G1SQtBI7ntAcJ > > > > _______________________________________________ > > > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > ____________________________________________________________________________________ Be a better pen pal. Text or chat with friends inside Yahoo! Mail. See how. http://overview.mail.yahoo.com/ From dinhocorreia em gmail.com Tue Dec 4 11:31:00 2007 From: dinhocorreia em gmail.com (Alexandre Correia) Date: Tue, 4 Dec 2007 17:31:00 -0200 Subject: [Cascavel-pm] threads Message-ID: <4d26c720712041131x4c76062foc94c0ea3b8b20f19@mail.gmail.com> Sou novo no grupo, gostaria de saber mais sobre threads no perl ... já andei lendo mas ainda tenho algumas dúvidas a respeito ... Obrigado Alexandre Correia :: dinhocorreia em gmail.com :: -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/ce4865de/attachment.html From fernandocorrea em gmail.com Tue Dec 4 10:44:56 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 16:44:56 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <985063.65508.qm@web44814.mail.sp1.yahoo.com> References: <006801c836a3$f5a353b0$0401a8c0@servidorliz> <985063.65508.qm@web44814.mail.sp1.yahoo.com> Message-ID: qual foi o erro q deu? Em 04/12/07, Rodrigo Fernandes escreveu: > > O mesmo comigo. Tentei acrescentar ".pak" depois de > -i, como sugerido em > http://www.thescripts.com/forum/thread49693.html, mas > também não funcionou. > > R. Fernandes > > --- fernandolouis em terra.com.br wrote: > > > Fernando não conhecia essa solução. > > Fiz o teste e me retornou o seguinte erro: Can´t do > > inplace edit without backup. Porque? > > > > []s, > > Fernando > > ----- Original Message ----- > > From: Fernando Oliveira > > To: Cascavel Perl Mongers > > Sent: Tuesday, December 04, 2007 3:42 PM > > Subject: Re: [Cascavel-pm]otimização em > > manipulação de texto > > > > > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > > > _______________________________________________ > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > ____________________________________________________________________________________ > Looking for last minute shopping deals? > Find them fast with Yahoo! Search. > http://tools.search.yahoo.com/newsearch/category.php?category=shopping > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/49df80bb/attachment.html From glasswalk3r em hotmail.com Tue Dec 4 11:21:03 2007 From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior) Date: Tue, 4 Dec 2007 22:21:03 +0300 Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit Message-ID: Luis Motta Campos luismottacampos em yahoo.co.uk Terça Dezembro 4 08:45:53 PST 2007 > Ahn... Alceu, isto estah... assim... um pouco abstrato demais, nao? > Que tal mais um pouco de informacao objetiva sobre o teu problema? > > Onde estah o codigo do TT que voce disse que estava usando? > > Voce alguma vez tentou falar com o Nelson Ferraz sobre ou olhou o AppML? > > Putamplexos interessados! > -- > Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, > Perl fanatic evangelist, and amateur {cook, photographer} Oi Luis, Eu já disse que não recebo nenhum email seu enviado pra lista? Pois é, tive que ir catar o seu lá no histórico da lista. Não faço a menor idéia porque isso acontece. Bem, voltando ao problema, vou contar com mais detalhes o que estou tentando fazer. Algumas vezes eu acabo escrevendo código Perl para ler as linhas de um arquivo e validar o leiaute de arquivos texto. Inevitavelmente os programas acabam ficando todos muito parecidos, então resolvi abstrair isso um pouco e criar módulos Perl que me permitissem gerar código Perl para executar testes automáticos usando Test::More. Para isso eu crio um arquivo XML com os meta dados. Um script Perl interpreta isso e, utilizando os módulos, gera o código Perl para testar esse arquivo específico. Depois é só executar outro script apontando um arquivo em questão, que deverá estar no leiaute definido ou o teste irá gerar erro em algum ponto. O código gerado funcionava mas era horrível de ler, se fosse necessário fazer algo. Eu também senti falta de ter algumas "lacunas" que poderiam ser preenchidas com código dependendo de algumas condições. Achei que o TT fosse ideal para fazer isso. Alguns testes depois e ficou muito bom. Mas eu não achei interessante ter que forçar um diretório aonde esses templates ficariam. Eu queria ter isso mais simplificado. Utilizar o mecanismo de busca em @INC me pareceu uma boa alternativa: eu crio um módulo Perl (definindo um pacote para cada template) só para que ele armazene o código do TT depois do handle __DATA__. Com isso eu deixo de ter que usar um arquivo de configuração (ou variável de ambiente) para definir o local aonde os templates estão: o perl sempre vai achar eles, desde que os módulos estejam instalados. À partir daí passei a ter erros. Para ter comodidade de uso, eu criei uma superclasse que tenha métodos para instanciar "objetos-template" e devolver o código posteriormente ao querer processar o modelo e gerar o código de teste. Eu utilizei um pouco de tabela de símbolos para poder ler o __DATA__ sempre da subclasse, nunca da superclasse (que não nada definido ali) mas isso não está funcionando: apesar de não ter erros ao ler __DATA__, a variável que recebe o conteúdo permanece com undef. Segue o código de um dos templates: package File::Validate::Template::Basic; use base 'File::Validate::Template'; 1; __DATA__ use Test::More; use warnings; use strict; [% IF locale %] use POSIX qw(locale_h); use locale; setlocale( LC_CTYPE, '[% locale %]' ); [% END %] my $format_regex = qr/[% format %]/; my $file = $ENV{FILE_TO_READ}; plan tests => $ENV{TOTAL_LINES} * [% total_tests %]; open( my $in, [% file_mode %], $file ) or die "Cannot read $file: $!\n"; while (<$in>) { chomp; my @fields = split( /\|/, $_ ); [% IF nullable %] SKIP: { skip 'Field is nullable and the content is NULL', [% total_tests %], unless( ( defined( $fields[[% index %]] ) ) and ( $fields[[% index %]] ne '') ); [% END %] like( $fields[[% index %]], $format_regex, "[% name %] content is correct, source line $." ); cmp_ok( length( $fields[[% index %]] ), '<=', [% size %], "[% name %] has length less or equal [% size %], source line $." ); [% IF nullable %] } [% END %] } close($in); Nunca ouvi falar em AppML e uma busca rápida no Wikipedia me diz que isso foi descontinuado (http://en.wikipedia.org/wiki/AppML). []'s --- Alceu Rodrigues de Freitas Junior glasswalk3r em hotmail.com "Escolha um trabalho que você ama e você nunca mais terá que trabalhar um dia na sua vida" - Confúcio _________________________________________________________________ Invite your mail contacts to join your friends list with Windows Live Spaces. It's easy! http://spaces.live.com/spacesapi.aspx?wx_action=create&wx_url=/friends.aspx&mkt=en-us -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/f33e7d24/attachment-0001.html From fernandocorrea em gmail.com Tue Dec 4 11:46:09 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 17:46:09 -0200 Subject: [Cascavel-pm] threads In-Reply-To: <4d26c720712041131x4c76062foc94c0ea3b8b20f19@mail.gmail.com> References: <4d26c720712041131x4c76062foc94c0ea3b8b20f19@mail.gmail.com> Message-ID: O q, mais precisamente, vc gostaria de saber? 2007/12/4, Alexandre Correia : > > Sou novo no grupo, gostaria de saber mais sobre threads no perl ... já > andei lendo mas ainda tenho algumas dúvidas a respeito ... > > Obrigado > Alexandre Correia > :: dinhocorreia em gmail.com :: > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/ac19a621/attachment.html From acid06 em gmail.com Tue Dec 4 12:12:21 2007 From: acid06 em gmail.com (Nilson Santos Figueiredo Junior) Date: Tue, 4 Dec 2007 18:12:21 -0200 Subject: [Cascavel-pm] Duvida Foreach In-Reply-To: <47558337.4000108@yahoo.co.uk> References: <344851.23524.qm@web31305.mail.mud.yahoo.com> <8ff2963a0711291621y62e59ffcw90e35dd8b069ec82@mail.gmail.com> <9a08c9b40711291750s1d2288b2teac524d693486659@mail.gmail.com> <47558337.4000108@yahoo.co.uk> Message-ID: <9a08c9b40712041212l29c08d45h5e4ccd7ffda9696f@mail.gmail.com> On Dec 4, 2007 2:41 PM, Luis Motta Campos wrote: > > É raro usar um for C-style. Mesmo para iteradores numéricos, prefiro usar: > > > > for my $i (0..$x) { } > > > > Um comentario apenas: esta forma eh a menos eficiente em termos de > memoria. se voce vai usar o formato do C, entao "abraca o capeta": > > for ( my $i = 0 ; $i <= $x; $i++ ) {} > > Esta eh a forma que melhor administra a tua memoria. isso faz diferenca > especialmente quando teus intervalos de numeros sao grandes. Em alguma versão do Perl 5.8.x foi introduzida uma otimização que não faz mais com que o foreach utilizado para iterar sobre um range de inteiros gerem uma lista temporária. Observe: #!/usr/bin/perl use warnings; use strict; use Benchmark 'cmpthese'; my $limit = 1000000; cmpthese(10, { c_style => sub { my $j = 0; for (my $i = 0; $i <= $limit; $i++) { $j++ } }, foreach => sub { my $j = 0; for my $i (0..$limit) { $j++ } } } ); Na verdade, o foreach acaba sendo 25% mais rápido na minha máquina (perl 5.8.8). Rate c_style foreach c_style 5.12/s -- -20% foreach 6.40/s 25% -- O uso de memória é o mesmo em ambas as versões do código. -Nilson Santos F. Jr. From fernandesrp em yahoo.com Tue Dec 4 12:12:12 2007 From: fernandesrp em yahoo.com (Rodrigo Fernandes) Date: Tue, 4 Dec 2007 12:12:12 -0800 (PST) Subject: [Cascavel-pm] otimização em manipulação de texto In-Reply-To: <604cec170712040956m7050fc03g209122059d0f6ed@mail.gmail.com> Message-ID: <712986.16950.qm@web44814.mail.sp1.yahoo.com> --- Nelson Ferraz wrote: > > Basicamente, abro o arquivo, coloco o conteúdo > numa > > array através do operador diamante, pesquiso > > linha-a-linha o meu fenômeno. Quando encontrado, > > modifico-o, volto a salvar em disco e inicio tudo > > novamente. > > Se você estiver lidando com arquivos grandes, é > melhor fazer as > substituições linha a linha, ou parágrafo a > parágrafo, do que > carregá-lo inteiro na memória. > > Isto é: > > while ( my $line = <> ) { > > # do something with $line > > } Isto já é o que acontece. > > > Bem, Perl é uma ótima linguagem, principalmente, > para > > mim, por eu não precisar declarar todas as > variáveis, > > mas Perl não deve ser à prova de estupidez, e acho > que > > meu código está um pouquinho estúpido. > > Você pode começar a torná-lo mais inteligente, se > abrir mão do "não > precisar declarar todas as variáveis". > > Ou seja: inclua um "use strict" e um "use warnings" > no começo do seu programa. > > É bem provável que, quando você fizer isso, seu > programa comece a > apresentar mensagens de erro. É para isso que estas > diretivas servem, > para apontar os problemas, de forma que você possa > corrigi-los. > > Portanto, comece os seus programas com: > > #!/usr/bin/perl > > use strict; > use warnings; > > while ( my $line = <> ) { > # ... > } > Iso já é o que acontece... a não ser pelas warnings, que depois de um certo tempo foram arbitrariamente caladas. > > Gostaria de saber a melhor forma de otimizá-lo. > > Acredito que um caminho seria fazer todas as > > alterações e salvar em disco apenas no final. > Porém, > > meus dados, eventualemnte, podem chegar a 500 Mb e > > centenas de arquivos plain text, ou MUITO mais. Há > > alguma forma "perlniana" de automatizar o fluxo > > memória/disco para fins de otimização? Algo que > > monitore a quantidade de memória necessária e > decida > > onde os dados serão armazenados. Ou nada disto é > > necessário? > > Na minha opinião, é melhor lidar com pedaços menores > de texto, ao > invés de tentar colocar tudo na memória de uma vez. > > Se você nos contar que tipo de dados está lidando -- > ou melhor ainda. > se puder nos fornecer um exemplo -- talvez possamos > ajudá-lo melhor. Obrigado pelo interesse, Nelson. Os arquivos são todos plain text, de tamanhos bastante diferentes. Desde o input, arquivos intermediários e o output, aparecem bichos de 1 kb a 10 MB, aproximadamente. São arquivos da biblioteca digital Grato, R. Fernandes > > []s > > Nelson > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > ____________________________________________________________________________________ Never miss a thing. Make Yahoo your home page. http://www.yahoo.com/r/hs From wendelscardua em gmail.com Tue Dec 4 12:18:33 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Tue, 4 Dec 2007 18:18:33 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> Message-ID: <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> Não faltou um "n" aí não ? perl -i -npe 's/isso/aquilo/g' arquivos Ou na versão criadora de becape perl -i.bkp -npe 's/isso/aquilo/g' arquivos On Dec 4, 2007 3:42 PM, Fernando Oliveira wrote: > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > []s Wendel, imaginando que o -i sem extensão de becape, e o -pe sem o -n , podem ter destruido o arquivo original de quem tentou usar. From acid06 em gmail.com Tue Dec 4 12:26:14 2007 From: acid06 em gmail.com (Nilson Santos Figueiredo Junior) Date: Tue, 4 Dec 2007 18:26:14 -0200 Subject: [Cascavel-pm] threads In-Reply-To: <4d26c720712041131x4c76062foc94c0ea3b8b20f19@mail.gmail.com> References: <4d26c720712041131x4c76062foc94c0ea3b8b20f19@mail.gmail.com> Message-ID: <9a08c9b40712041226w69988474v789a32b72c3b3dbb@mail.gmail.com> On Dec 4, 2007 5:31 PM, Alexandre Correia wrote: > Sou novo no grupo, gostaria de saber mais sobre threads no perl ... já andei > lendo mas ainda tenho algumas dúvidas a respeito ... perldoc threads perldoc threads::shared Os threads em Perl são heavy-weight e cada thread possui um clone do interpretador separado. Dessa forma, todo código em Perl puro é thread-safe e todo o compartilhamento deve ser explícito. Existe um módulo de minha autoria que abstrai a utilização de threads, permitindo a declaração de funções que sempre serão executadas em paralelo. Ele foi feito mais como "proof-of-concept" que pra ser utilizado de verdade, mas já quebrou alguns galhos e funciona relativamente bem aonde eu já testei. YMMV. http://search.cpan.org/~nilsonsfj/subs-parallel-0.08/lib/subs/parallel.pm Existe um módulo para sistemas com suporte nativo a fork() que emula a API de threads do Perl usando processos separados ao invés de threads, o que pode ser potencialmente mais eficiente em alguns casos: http://search.cpan.org/~rybskej/forks-0.26/ -Nilson Santos F. Jr. From fernandocorrea em gmail.com Tue Dec 4 12:43:20 2007 From: fernandocorrea em gmail.com (Fernando Oliveira) Date: Tue, 4 Dec 2007 18:43:20 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> Message-ID: ou se usa o -p ou o -n... não se usa os 2 juntos... 2007/12/4, Wendel Scardua : > > Não faltou um "n" aí não ? > > perl -i -npe 's/isso/aquilo/g' arquivos > > Ou na versão criadora de becape > > perl -i.bkp -npe 's/isso/aquilo/g' arquivos > > > On Dec 4, 2007 3:42 PM, Fernando Oliveira > wrote: > > perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo > > > > []s > Wendel, imaginando que o -i sem extensão de becape, e o -pe sem o -n , > podem ter destruido o arquivo original de quem tentou usar. > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- []'s Fernando -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/e3a93928/attachment.html From wendelscardua em gmail.com Tue Dec 4 12:57:51 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Tue, 4 Dec 2007 18:57:51 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> Message-ID: <726229b50712041257q316aaf72ld85d94267f8bf474@mail.gmail.com> Uia, sempre usei -np ... só agora que você falou que eu fui ver que não precisava... deathnote:~ wendel$ perl -MO=Deparse -pe 's/foo/bar/' LINE: while (defined($_ = )) { s/foo/bar/; } continue { print $_; } -e syntax OK deathnote:~ wendel$ perl -MO=Deparse -npe 's/foo/bar/' LINE: while (defined($_ = )) { s/foo/bar/; } continue { print $_; } -e syntax OK Eu sempre achei que o -p só adicionava o "print $_" depois da expressão, e que era o -n que estava colocando o loop.... On Dec 4, 2007 6:43 PM, Fernando Oliveira wrote: > ou se usa o -p ou o -n... não se usa os 2 juntos... > []s Wendel, vivendo e aprendendo... From acid06 em gmail.com Tue Dec 4 12:19:39 2007 From: acid06 em gmail.com (Nilson Santos Figueiredo Junior) Date: Tue, 4 Dec 2007 18:19:39 -0200 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> Message-ID: <9a08c9b40712041219y80d6422gfcf14715bfcabba0@mail.gmail.com> On Dec 4, 2007 9:50 AM, Veronica Soraia wrote: > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e por > trás dessa interface vai rodar um processamento. Alguem tem alguma ideia por > onde posso começar, será usando o módulo de GTK no Perl ??? Não recomendo utilizar Gtk para Windows. É chato de instalar, mal suportado e eu não gosto do Gtk em nenhuma plataforma pra início de conversa. ;-) Se você quer fazer uma aplicação exclusivamente para Windows e que seja simples, dê uma olhada no Win32::GUI. Para aplicações um pouco mais elaboradas, de uma olhada no módulo Tk. Para aplicações profissionais, a melhor alternativa provavelmente é o Wx mesmo, mas ele é mais complexo e requer estudo. -Nilson Santos F. Jr. From shonorio em gmail.com Tue Dec 4 16:38:05 2007 From: shonorio em gmail.com (Solli Honorio) Date: Tue, 4 Dec 2007 22:38:05 -0200 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <9a08c9b40712041219y80d6422gfcf14715bfcabba0@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> <9a08c9b40712041219y80d6422gfcf14715bfcabba0@mail.gmail.com> Message-ID: <12d1f4ee0712041638r73b3a7a0n7afdf47c045a788f@mail.gmail.com> On Dec 4, 2007 6:19 PM, Nilson Santos Figueiredo Junior wrote: > On Dec 4, 2007 9:50 AM, Veronica Soraia wrote: > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica e > por > > trás dessa interface vai rodar um processamento. Alguem tem alguma ideia > por > > onde posso começar, será usando o módulo de GTK no Perl ??? > > Não recomendo utilizar Gtk para Windows. É chato de instalar, mal > suportado e eu não gosto do Gtk em nenhuma plataforma pra início de > conversa. ;-) > Concordo com o Nilson, novamente, o GTK é um péssima escolha para Windows. > > Se você quer fazer uma aplicação exclusivamente para Windows e que > seja simples, dê uma olhada no Win32::GUI. > Para aplicações um pouco mais elaboradas, de uma olhada no módulo Tk. > Para aplicações profissionais, a melhor alternativa provavelmente é o > Wx mesmo, mas ele é mais complexo e requer estudo. > > -Nilson Santos F. Jr. > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- "o animal satisfeito dorme". - Guimarães Rosa -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071204/54fb0fac/attachment-0001.html From luismottacampos em yahoo.co.uk Wed Dec 5 00:42:17 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Wed, 05 Dec 2007 09:42:17 +0100 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <946301.77581.qm@web44808.mail.sp1.yahoo.com> References: <946301.77581.qm@web44808.mail.sp1.yahoo.com> Message-ID: <47566469.4080603@yahoo.co.uk> Rodrigo Fernandes wrote: > Este problema foi resolvido! Bom, voce poderia ser menos egoista e centrado no seu umbigo e mandar a solucao que funcionou para voce. Eu tenho certeza de que vou gostar de poder apontar o proximo que me fizer a mesma pergunta para uma solucao relatada nos arquivos da lista. Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Wed Dec 5 00:48:24 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Wed, 05 Dec 2007 09:48:24 +0100 Subject: [Cascavel-pm] Duvida Foreach In-Reply-To: <9a08c9b40712041212l29c08d45h5e4ccd7ffda9696f@mail.gmail.com> References: <344851.23524.qm@web31305.mail.mud.yahoo.com> <8ff2963a0711291621y62e59ffcw90e35dd8b069ec82@mail.gmail.com> <9a08c9b40711291750s1d2288b2teac524d693486659@mail.gmail.com> <47558337.4000108@yahoo.co.uk> <9a08c9b40712041212l29c08d45h5e4ccd7ffda9696f@mail.gmail.com> Message-ID: <475665D8.2000705@yahoo.co.uk> Nilson Santos Figueiredo Junior wrote: > On Dec 4, 2007 2:41 PM, Luis Motta Campos wrote: >> Um comentario apenas: esta forma eh a menos eficiente em termos de >> memoria. se voce vai usar o formato do C, entao "abraca o capeta": >> >> for ( my $i = 0 ; $i <= $x; $i++ ) {} >> >> Esta eh a forma que melhor administra a tua memoria. isso faz diferenca >> especialmente quando teus intervalos de numeros sao grandes. > > Em alguma versão do Perl 5.8.x foi introduzida uma otimização que não > faz mais com que o foreach utilizado para iterar sobre um range de > inteiros gerem uma lista temporária. [snip] > O uso de memória é o mesmo em ambas as versões do código. Interessante... eu nunca li nada a respeito. Obrigado por me chamar a atencao para este detalhe ;) Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Wed Dec 5 00:49:22 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Wed, 05 Dec 2007 09:49:22 +0100 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> Message-ID: <47566612.3080901@yahoo.co.uk> Wendel Scardua wrote: > Wendel, imaginando que o -i sem extensão de becape, e o -pe sem o -n , > podem ter destruido o arquivo original de quem tentou usar. Wendel, tua imaginacao eh precisa e afiada como um bisturi cirurgico ;) Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From luismottacampos em yahoo.co.uk Wed Dec 5 01:14:19 2007 From: luismottacampos em yahoo.co.uk (Luis Motta Campos) Date: Wed, 05 Dec 2007 10:14:19 +0100 Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit In-Reply-To: References: Message-ID: <47566BEB.1010103@yahoo.co.uk> Alceu Rodrigues de Freitas Junior wrote: > Oi Luis, Eu já disse que não recebo nenhum email seu enviado pra > lista? Pois é, tive que ir catar o seu lá no histórico da lista. Não > faço a menor idéia porque isso acontece. Isso eh um problema para se colocar para os moderadores da lista. Algum moderador escutando? :) > Bem, voltando ao problema, vou contar com mais detalhes o que estou > tentando fazer. [explicacao comprida, confusa e sem codigo aqui] > À partir daí passei a ter erros. Para ter comodidade de uso, eu criei > uma superclasse que tenha métodos para instanciar "objetos-template" > e devolver o código posteriormente ao querer processar o modelo e > gerar o código de teste. Eu utilizei um pouco de tabela de símbolos > para poder ler o __DATA__ sempre da subclasse, nunca da superclasse > (que não nada definido ali) mas isso não está funcionando: apesar de > não ter erros ao ler __DATA__, a variável que recebe o conteúdo > permanece com undef. Onde estah o codigo de leitura do __DATA__ ? Ler do __DATA__ nao eh trivial, especialmente quando voce estah tentando ler de um __DATA__ que nao eh o seu proprio. Eu recomendo que voce transcreva teus templates em um inline string dentro de um metodo na classe filha. Assim, fica mais simples de entender o que voce estah colocando ali. Bom, isso se voce quiser continuar com esta solucao complicada. Pelo que eu entendi, voce esta instalando os modulos que fazem parte do seu sistema em algum lugar. Voce sabe que voce pode instalar mais do que apenas modulos, nao? Assim, seja lah onde voce estiver, sempre pode instalar seus templates, nos mesmos diretorios (ou em um separado, se fizer muita diferenca para voce) em que instalou as bibliotecas. Desta maneira, voce sempre vai ter seus templates mais ou menos no mesmo lugar, mas flexivel o bastante para se adaptar quando o usuario tiver uma instalacao nao convencional de perl. Os modulos que voce precisa sao: Config.pm (configuracao do Perl, detalhes de compilacao, path para as bibliotecas); e FindBin (muito util para determinar diretorios de onde voce estah rodando e onde estao suas bibliotecas). > Nunca ouvi falar em AppML e uma busca rápida no Wikipedia me diz que > isso foi descontinuado (http://en.wikipedia.org/wiki/AppML). A sugestao era que voce desse uma espiada no codigo do AppML e comparasse com o teu proprio codigo de leitura de informacao a partir do __DATA__ de outros modulos. Ele faz isso, eu tenho quase certeza. Voce ainda me deve: 1. Status; 2. Codigo de leitura do __DATA__ que voce estah usando. Putamplexos! -- Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer, Perl fanatic evangelist, and amateur {cook, photographer} From dinhocorreia em gmail.com Wed Dec 5 03:20:19 2007 From: dinhocorreia em gmail.com (Alexandre Correia) Date: Wed, 5 Dec 2007 09:20:19 -0200 Subject: [Cascavel-pm] Threads Message-ID: <4d26c720712050320u4a7ee7f8s7c8bfc825080177f@mail.gmail.com> Desde de já agradeço a atenção de todos os participantes da lista a respeito de minha dúvida sobre threads. Comecei com perl a pouco tempo e estou desenvolvendo uma aplicação para web já aproveitando os módulos desenvolvidos para o Jabber. Fiz um script client ( soquete ) conectando com um script server ( soquete tb ), dentro do script server quando este recebe a conexão verifica se dentro do hash já existe o usuário que está solicitando a conexão, senão cria-se a instância para o módulo do jabber onde a partir desse momento eu crio uma simples thread onde o mesmo fica recebendo todas as presencas e mensagens para este usuário. Uma primveira visão de tudo isso, seria o script server recebe uma conexão e a partir dai conecta-se no jabber onde ficaria rodando um processo para cada conexão, novamente quando o cliente se conecta-se nesse socket, a um tempo X, este retornaria tudo que passou nessa conexão que ficou aberta com o servidor jabber. É onde eu imagino que entre as threads. Att. Alexandre Correia :: dinhocorreia em gmail.com :: -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071205/60c8386b/attachment.html From shonorio em gmail.com Wed Dec 5 03:38:53 2007 From: shonorio em gmail.com (Solli Honorio) Date: Wed, 5 Dec 2007 09:38:53 -0200 Subject: [Cascavel-pm] Perl em Windows In-Reply-To: <12d1f4ee0712041638r73b3a7a0n7afdf47c045a788f@mail.gmail.com> References: <8ed2dfc0712040350o4512beeg3d5f97082a3d29c7@mail.gmail.com> <9a08c9b40712041219y80d6422gfcf14715bfcabba0@mail.gmail.com> <12d1f4ee0712041638r73b3a7a0n7afdf47c045a788f@mail.gmail.com> Message-ID: <12d1f4ee0712050338g6a0e3439i8fe7d4ebfe4c2d9b@mail.gmail.com> On Dec 4, 2007 10:38 PM, Solli Honorio wrote: > > > On Dec 4, 2007 6:19 PM, Nilson Santos Figueiredo Junior > wrote: > > > On Dec 4, 2007 9:50 AM, Veronica Soraia > > wrote: > > > preciso rodar o perl em Windows, só que ele terá uma interface gráfica > > e por > > > trás dessa interface vai rodar um processamento. Alguem tem alguma > > ideia por > > > onde posso começar, será usando o módulo de GTK no Perl ??? > > > > Não recomendo utilizar Gtk para Windows. É chato de instalar, mal > > suportado e eu não gosto do Gtk em nenhuma plataforma pra início de > > conversa. ;-) > > > > Concordo com o Nilson, novamente, o GTK é um péssima escolha para Windows. > > Explicando melhor a minha afirmação. O GTK/TK faz com que a interface fique com cara de Linux no ambiente Windows, o que é bem feio e agressivo. Já o wxperl faz com que a aplicação fique com cara de Windows no ambiente Windows, de Linux no ambiente Linux e cara de Mac no MacOS. Solli M. Hónorio -- "o animal satisfeito dorme". - Guimarães Rosa -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071205/1f9e08eb/attachment.html From fernandolouis em terra.com.br Wed Dec 5 04:10:07 2007 From: fernandolouis em terra.com.br (fernandolouis em terra.com.br) Date: Wed, 5 Dec 2007 10:10:07 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= References: <645915.21652.qm@web44809.mail.sp1.yahoo.com><006801c836a3$f5a353b0$0401a8c0@servidorliz> Message-ID: <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> fazendo o backup deu certo sim... percebi também que posso fazer isso em vários arquivos simultaneamente, colocando um ao lado do outro (separando-os por espaço) Uma dúvida: como saber todos os atributos e as respectivas características, como: -p -n -i, etc...? []s, Fernando ----- Original Message ----- From: Fernando Oliveira To: Cascavel Perl Mongers Sent: Tuesday, December 04, 2007 4:44 PM Subject: Re: [Cascavel-pm]otimização em manipulação de texto vc está usando windows?! no windows, por algum motivo, ele não consegue fazer isso sem backup... basta fazer o seguinte: substitua o -i por -i.bkp (ou qq outro final de arquivo...) antes de substituir ele vai fazer uma cópia de backup... se o nome do seu arquivo era teste.txt, o backup vai ser teste.txt.bkp Em 04/12/07, fernandolouis em terra.com.br < fernandolouis em terra.com.br> escreveu: Fernando não conhecia essa solução. Fiz o teste e me retornou o seguinte erro: Can´t do inplace edit without backup. Porque? []s, Fernando ----- Original Message ----- From: Fernando Oliveira To: Cascavel Perl Mongers Sent: Tuesday, December 04, 2007 3:42 PM Subject: Re: [Cascavel-pm]otimização em manipulação de texto perl -i -pe 's/$regex/$sejaLaOQueFor/g' arquivo _______________________________________________ Cascavel-pm mailing list Cascavel-pm em pm.org http://mail.pm.org/mailman/listinfo/cascavel-pm -- []'s Fernando ------------------------------------------------------------------------------ _______________________________________________ Cascavel-pm mailing list Cascavel-pm em pm.org http://mail.pm.org/mailman/listinfo/cascavel-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071205/00314887/attachment-0001.html From joaohf em gmail.com Wed Dec 5 04:20:12 2007 From: joaohf em gmail.com (=?UTF-8?Q?Jo=C3=A3o_Henrique_Freitas?=) Date: Wed, 5 Dec 2007 10:20:12 -0200 Subject: [Cascavel-pm] Win32 PerfMon In-Reply-To: <12d1f4ee0711291946k2c46efc2g3acc6dce3383b1b@mail.gmail.com> References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com> <12d1f4ee0710170604m506356e5l4c5ac6629fd052b0@mail.gmail.com> <88e33d220710171142r27e43641ge09fa869466503c1@mail.gmail.com> <12d1f4ee0710221931i2544fc82yea8fbe67784ab2d@mail.gmail.com> <88e33d220710230306p5fab8942p9189cc7ae1ab4b10@mail.gmail.com> <12d1f4ee0710230914r78711430y681b38be9f399298@mail.gmail.com> <88e33d220710261249o7a4296abj1a07495ede6c26bd@mail.gmail.com> <12d1f4ee0710300458g2d5c3edyddfc9691f22f002e@mail.gmail.com> <88e33d220710300541j390e1d70w40fe504d948c896d@mail.gmail.com> <12d1f4ee0711291946k2c46efc2g3acc6dce3383b1b@mail.gmail.com> Message-ID: <88e33d220712050420q7bdd8781u1af1478fda770702@mail.gmail.com> Ok, vou testar. Agradeço On Nov 30, 2007 1:46 AM, Solli Honorio wrote: > Cara, demorou um pouco mas eu fiz as alterações para resolver os bugs. Eu > abrí um chamado no cpan com as informações e a correção, agora vamos ver no > que vai dar. > > Abraços, > > Solli M. Honório > > On Oct 30, 2007 10:41 AM, João Henrique Freitas wrote: > > > Olá > > > > Bom, ontem gastei uma tarde inteira com o PerMon. A princípio as coisas > > funcionaram mas quando comecei a analisar bem, também encontrei problemas no > > ListCounters. Por exemplo ele não listava os contadores do objeto > > LogicalDisk e muitos outros. Acho que é o mesmo problema que você encontrou. > > > > > > Sobre o compilador, agora está explicado. > > > > > > > > On Oct 30, 2007 8:58 AM, Solli Honorio < shonorio em gmail.com> wrote: > > > > > Inclusive o ListCounter ? Pois eu tive um problema com este cara > > > também e estou fazendo uma correção para este cara também. Mando isto para > > > vc este final de semana. > > > > > > Você me perguntou sobre o Visual C++, e aproveito e respondo aqui. O > > > pessoal prefere utilizar o VS 6 porque a dll deste compilador já está > > > incluso no sistema operacional. Quando vc utiliza o VS 7 ou VS 8, você > > > precisa instalar as dlls (MSVCR*.dll) que por algum motivo exotérico a > > > Microsoft não torna isto muito simples ou claro. > > > > > > Fiz algumas tentativas para utilizar o Dev C++ para compilar o > > > PerfMon, por exemplo, baixando o 'Windows 2003 SDK' mas não consegui. Se eu > > > conseguir fazer isto lhe aviso. > > > > > > Enquanto isto o dono do PerfMon não se pronunciou. > > > > > > Solli M. Honório > > > > > > On 10/26/07, João Henrique Freitas < joaohf em gmail.com > wrote: > > > > > > > Olá, depois de um tempo perdido na construção do ambiente. Consegui > > > > testar: > > > > > > > > Estou utilizando um Windows 2003 com Visual C++ 6.0 > > > > > > > > Apliquei os seus patchs utilizando a versão GNU do comando patch. > > > > > > > > Fiz a compilação como escrito no README do pacote PerfMon. > > > > > > > > Tudo funcionou como esperado, não mais apresentou os erros. > > > > > > > > > > > > Ok, perfeito o seu patch funcionou. Um dia também vou aprender a > > > > consertar as coisas. > > > > > > > > Obrigado. > > > > > > > > > > > > > > > > On 10/23/07, Solli Honorio wrote: > > > > > > > > > Bom, eu descobri um bug na minha correção. É que eu fiz de um > > > > > jeito mais estruturado, mas para manter a compatibilidade com a maneira como > > > > > o cara faz o retorno de erro (alias, uma pela maneira de como não fazer) > > > > > tive que 'emporcalhar o código' e aí sobrou um pouco de sujeira :). Descobri > > > > > também o mesmo problema com o ListObjects, vou alterar e enviar novamente > > > > > para o cara >:[ > > > > > > > > > > Solli M. Honório > > > > > > > > > > On 10/23/07, João Henrique Freitas < joaohf em gmail.com> wrote: > > > > > > > > > > > Que bom! > > > > > > > > > > > > Vou testar e reporto. > > > > > > > > > > > > Obrigado > > > > > > > > > > > > On 10/23/07, Solli Honorio < shonorio em gmail.com> wrote: > > > > > > > > > > > > > Cara, > > > > > > > > > > > > > > Fiz a correção e enviei para o Glen Small, agora é torcer para > > > > > > > que ele leia o email fornecido. Você pode aplicar e compilar o patch que > > > > > > > enviei para ele no teu ambiente e aí colocar para funcionar o teu ambiente > > > > > > > enquanto o patch não é aplicado oficialmente. > > > > > > > > > > > > > > Segue o patch, pelo menos por curiosidade :) > > > > > > > > > > > > > > Solli M. Honório > > > > > > > > > > > > > > On 10/17/07, João Henrique Freitas wrote: > > > > > > > > > > > > > > > > Solli, > > > > > > > > > > > > > > > > O link http://www.perlmonks.org/?node_id=439313 relata > > > > > > > > exatamente o problema que encontrei. > > > > > > > > > > > > > > > > Tenho um código meio pronto para extrair (usando o PerfMon) > > > > > > > > a informação e montar o XML mas está faltando justamente a parte da > > > > > > > > instância que é primordial. Se quiser posto aqui. > > > > > > > > > > > > > > > > Sobre o Zabbix, basicamente estou usando os agentes de > > > > > > > > monitoramento instalados em alguns clientes geograficamente separados para > > > > > > > > coletar o maior número de informações que necessitam ser armazenadas para > > > > > > > > identificação de problemas de forma proativa. > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > On 10/17/07, Solli Honorio wrote: > > > > > > > > > > > > > > > > > > Eu conheço o Zabbix, vou dar uma olhada neste no PerfMon > > > > > > > > > para tentar resolver este problema. > > > > > > > > > > > > > > > > > > Pelo o que eu ví não deve estar tão difícil de resolver > > > > > > > > > este problema, só preciso montar o circo em casa.... vou dar uma olhada > > > > > > > > > nisto neste final de semana (se o meu orientador deixar é claro ;) ). O teu > > > > > > > > > problema está apenas na lista de instâncias ? Pois eu acho que ainda tenho > > > > > > > > > um programa com o PerfLib que faz isto !!! > > > > > > > > > > > > > > > > > > Onde vc estará utilizando o Zabbix ? Eu tenho interesse > > > > > > > > > nestes projetos de monitoramento de infra-estrutura e gostaria de saber mais > > > > > > > > > o que você está fazendo, se isto for possível é claro. > > > > > > > > > > > > > > > > > > Solli M. Honório > > > > > > > > > > > > > > > > > > On 10/17/07, João Henrique Freitas < joaohf em gmail.com > > > > > > > > > > wrote: > > > > > > > > > > > > > > > > > > > > Olá, > > > > > > > > > > > > > > > > > > > > É um módulo bem fácil de mexer. Pena que nem tudo > > > > > > > > > > funciona mas acho que dá para consertar. > > > > > > > > > > > > > > > > > > > > Estou trabalhando com uma aplicação chamada Zabbix. Ela > > > > > > > > > > suporta inserção de informações para serem monitoradas em um servidor via > > > > > > > > > > XML, facilitando o trabalho. A minha intenção é pegar cada contador de > > > > > > > > > > desempenho do windows e gerar o XML para o Zabbix. > > > > > > > > > > > > > > > > > > > > Uma das formas é utilizar o módulo e a outra é extrair > > > > > > > > > > os contadores com o comando typeperf e depois utilizar os recursos do perl > > > > > > > > > > para extrar as informações necessárias e estruturar o XML. > > > > > > > > > > > > > > > > > > > > A primeira forma via módulo Win32:PerfMon tem um design > > > > > > > > > > mais interessante e expansível, infelizmente esbarrei no retorno da função > > > > > > > > > > ListInstances(). > > > > > > > > > > > > > > > > > > > > Obrigado pela atenção. > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > On 10/16/07, Solli Honorio < shonorio em gmail.com > wrote: > > > > > > > > > > > > > > > > > > > > > > Cara, eu acabei de dar uma olhada rápida no código XS > > > > > > > > > > > e ví que o pdh está reclamando de argumentos inválidos. Ví também que o > > > > > > > > > > > código é no mínimo estranho, pena pois este módulo realmente é interssante, > > > > > > > > > > > mas faz tempo que eu não trabalho com ele. > > > > > > > > > > > > > > > > > > > > > > Mas fala aí o que vc está precisando ? Talvez eu possa > > > > > > > > > > > ajudar enquanto dou olhada com mais calma no código XS deste módulo. > > > > > > > > > > > > > > > > > > > > > > Solli M. Honório > > > > > > > > > > > > > > > > > > > > > > On 10/16/07, João Henrique Freitas < joaohf em gmail.com > > > > > > > > > > > > wrote: > > > > > > > > > > > > > > > > > > > > > > > Olá, tudo bom? > > > > > > > > > > > > > > > > > > > > > > > > Estou tentando utilizar o PERL e o módulo > > > > > > > > > > > > Win32::PerfMon disponível em http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm > > > > > > > > > > > > > > > > > > > > > > > > com > > > > > > > > > > > > o seguinte objetivo: > > > > > > > > > > > > > > > > > > > > > > > > Gerar uma listagem dos objetos, contadores e > > > > > > > > > > > > instâncias relacionados aos monitores de desempenho de um servidor Windows > > > > > > > > > > > > 2000/2003. > > > > > > > > > > > > > > > > > > > > > > > > Alguém na lista já teve a oportunidade de utilizar > > > > > > > > > > > > com sucesso o módulo Win32::PerfMon? > > > > > > > > > > > > > > > > > > > > > > > > Estou tendo alguns problemas como relado em > > > > > > > > > > > > http://www.perlmonks.org/?node_id=439313 por Solli > > > > > > > > > > > > Moreira Honorio. > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > Obrigado > > > > > > > > > > > > -- > > > > > > > > > > > > ------------------------------------------------------------- > > > > > > > > > > > > > > > > > > > > > > > > João Henrique Freitas - joaohf_at_gmail.com > > > > > > > > > > > > Americana-SP-Brasil > > > > > > > > > > > > BSD051283 > > > > > > > > > > > > LPI 1 > > > > > > > > > > > > http://paginas.terra.com.br/informatica/joaohf > > > > > > > > > > > > http://www.livejournal.com/users/joaohf/ > > > > > > > > > > > > _______________________________________________ > > > > > > > > > > > > Cascavel-pm mailing list > > > > > > > > > > > > Cascavel-pm em pm.org > > > > > > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > > > "o animal satisfeito dorme". - Guimarães Rosa > > > > > > > > > > > _______________________________________________ > > > > > > > > > > > Cascavel-pm mailing list > > > > > > > > > > > Cascavel-pm em pm.org > > > > > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > > ------------------------------------------------------------- > > > > > > > > > > > > > > > > > > > > João Henrique Freitas - joaohf_at_gmail.com > > > > > > > > > > Americana-SP-Brasil > > > > > > > > > > BSD051283 > > > > > > > > > > LPI 1 > > > > > > > > > > http://paginas.terra.com.br/informatica/joaohf > > > > > > > > > > http://www.livejournal.com/users/joaohf/ > > > > > > > > > > > > > > > > > > > > _______________________________________________ > > > > > > > > > > Cascavel-pm mailing list > > > > > > > > > > Cascavel-pm em pm.org > > > > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > "o animal satisfeito dorme". - Guimarães Rosa > > > > > > > > > > > > > > > > > > _______________________________________________ > > > > > > > > > Cascavel-pm mailing list > > > > > > > > > Cascavel-pm em pm.org > > > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > > > > > > > > ------------------------------------------------------------- > > > > > > > > João Henrique Freitas - joaohf_at_gmail.com > > > > > > > > Americana-SP-Brasil > > > > > > > > BSD051283 > > > > > > > > LPI 1 > > > > > > > > http://paginas.terra.com.br/informatica/joaohf > > > > > > > > http://www.livejournal.com/users/joaohf/ > > > > > > > > > > > > > > > > _______________________________________________ > > > > > > > > Cascavel-pm mailing list > > > > > > > > Cascavel-pm em pm.org > > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > "o animal satisfeito dorme". - Guimarães Rosa > > > > > > > > > > > > > > _______________________________________________ > > > > > > > Cascavel-pm mailing list > > > > > > > Cascavel-pm em pm.org > > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > ------------------------------------------------------------- > > > > > > João Henrique Freitas - joaohf_at_gmail.com > > > > > > Americana-SP-Brasil > > > > > > BSD051283 > > > > > > LPI 1 > > > > > > http://paginas.terra.com.br/informatica/joaohf > > > > > > http://www.livejournal.com/users/joaohf/ > > > > > > > > > > > > _______________________________________________ > > > > > > Cascavel-pm mailing list > > > > > > Cascavel-pm em pm.org > > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > "o animal satisfeito dorme". - Guimarães Rosa > > > > > > > > > > _______________________________________________ > > > > > Cascavel-pm mailing list > > > > > Cascavel-pm em pm.org > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > > > > > > -- > > > > ------------------------------------------------------------- > > > > João Henrique Freitas - joaohf_at_gmail.com > > > > Americana-SP-Brasil > > > > BSD051283 > > > > LPI 1 > > > > http://paginas.terra.com.br/informatica/joaohf > > > > http://www.livejournal.com/users/joaohf/ > > > > > > > > _______________________________________________ > > > > Cascavel-pm mailing list > > > > Cascavel-pm em pm.org > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > > > > > > -- > > > "o animal satisfeito dorme". - Guimarães Rosa > > > > > > _______________________________________________ > > > Cascavel-pm mailing list > > > Cascavel-pm em pm.org > > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > > > > > > -- > > ------------------------------------------------------------- > > João Henrique Freitas - joaohf_at_gmail.com > > Americana-SP-Brasil > > BSD051283 > > LPI 1 > > http://paginas.terra.com.br/informatica/joaohf > > http://www.livejournal.com/users/joaohf/ > > > > _______________________________________________ > > Cascavel-pm mailing list > > Cascavel-pm em pm.org > > http://mail.pm.org/mailman/listinfo/cascavel-pm > > > > > > -- > "o animal satisfeito dorme". - Guimarães Rosa > > _______________________________________________ > Cascavel-pm mailing list > Cascavel-pm em pm.org > http://mail.pm.org/mailman/listinfo/cascavel-pm > -- ------------------------------------------------------------- João Henrique Freitas - joaohf_at_gmail.com Americana-SP-Brasil BSD051283 LPI 1 http://paginas.terra.com.br/informatica/joaohf http://www.livejournal.com/users/joaohf/ -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071205/7951ac97/attachment-0001.html From wendelscardua em gmail.com Wed Dec 5 04:25:15 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Wed, 5 Dec 2007 10:25:15 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <47566612.3080901@yahoo.co.uk> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <726229b50712041218pa87874dh7514cf8ea4d1e555@mail.gmail.com> <47566612.3080901@yahoo.co.uk> Message-ID: <726229b50712050425i19675adfy72e1638cfbd87e55@mail.gmail.com> On Dec 5, 2007 6:49 AM, Luis Motta Campos wrote: > Wendel Scardua wrote: > > Wendel, imaginando que o -i sem extensão de becape, e o -pe sem o -n , > > podem ter destruido o arquivo original de quem tentou usar. > > Wendel, tua imaginacao eh precisa e afiada como um bisturi cirurgico ;) > Putamplexos! > -- Você esqueceu do final da frase, Luís: "Wendel, tua imaginacao eh precisa e afiada como um bisturi cirurgico ... na mão do Jeremias." Afinal, o -p já inclui o -n, vide o -MO=Deparse, ou via perldoc perlrun (é, eu usei o Deparse antes de RTFM =p ) -p causes Perl to assume the following loop around your program, which makes it iterate over filename arguments somewhat like sed: LINE: while (<>) { ... # your program goes here } continue { print or die "-p destination: $!\n"; } If a file named by an argument cannot be opened for some reason, Perl warns you about it, and moves on to the next file. Note that the lines are printed automatically. An error occurring during printing is treated as fatal. To suppress printing use the -n switch. A -p overrides a -n switch. "BEGIN" and "END" blocks may be used to capture control before or after the implicit loop, just as in awk. []s Wendel From wendelscardua em gmail.com Wed Dec 5 04:19:29 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Wed, 5 Dec 2007 10:19:29 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <006801c836a3$f5a353b0$0401a8c0@servidorliz> <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> Message-ID: <726229b50712050419o3bb72d52tfb9a22b1b7d69b60@mail.gmail.com> man perl ou como se costuma dizer: RTFM (Read The "Friendly" Manual) []s Wendel On Dec 5, 2007 10:10 AM, wrote: > > > fazendo o backup deu certo sim... percebi também que posso fazer isso em > vários arquivos simultaneamente, colocando um ao lado do outro (separando-os > por espaço) > > Uma dúvida: > > como saber todos os atributos e as respectivas características, como: > -p -n -i, etc...? > > []s, > Fernando From wendelscardua em gmail.com Wed Dec 5 04:26:11 2007 From: wendelscardua em gmail.com (Wendel Scardua) Date: Wed, 5 Dec 2007 10:26:11 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <726229b50712050419o3bb72d52tfb9a22b1b7d69b60@mail.gmail.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <006801c836a3$f5a353b0$0401a8c0@servidorliz> <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> <726229b50712050419o3bb72d52tfb9a22b1b7d69b60@mail.gmail.com> Message-ID: <726229b50712050426r6ca44d34x841a0611e1d6479@mail.gmail.com> Atalho: a documentação da linha de comando em si é essa: perldoc perlrun []s Wendel On Dec 5, 2007 10:19 AM, Wendel Scardua wrote: > man perl > > ou como se costuma dizer: RTFM (Read The "Friendly" Manual) > > []s > > Wendel > > > On Dec 5, 2007 10:10 AM, wrote: > > > > > > fazendo o backup deu certo sim... percebi também que posso fazer isso em > > vários arquivos simultaneamente, colocando um ao lado do outro (separando-os > > por espaço) > > > > Uma dúvida: > > > > como saber todos os atributos e as respectivas características, como: > > -p -n -i, etc...? > > > > []s, > > Fernando > -- []s Wendel From lgonzaga em lncc.br Wed Dec 5 04:37:32 2007 From: lgonzaga em lncc.br (Luiz Gonzaga) Date: Wed, 5 Dec 2007 10:37:32 -0200 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <726229b50712050426r6ca44d34x841a0611e1d6479@mail.gmail.com> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <726229b50712050419o3bb72d52tfb9a22b1b7d69b60@mail.gmail.com> <726229b50712050426r6ca44d34x841a0611e1d6479@mail.gmail.com> Message-ID: <200712051037.32922.lgonzaga@lncc.br> Nao adianta Wendel, ele nao le a documentacao, como ja escreveu antes: "A compreensão é mais rápida quando explicada cara-a-cara que cara-a-livro." Luiz. Em Quarta 05 Dezembro 2007 10:26, Wendel Scardua escreveu: > Atalho: a documentação da linha de comando em si é essa: perldoc perlrun > > > []s > Wendel > > On Dec 5, 2007 10:19 AM, Wendel Scardua wrote: > > man perl > > > > ou como se costuma dizer: RTFM (Read The "Friendly" Manual) > > > > []s > > > > Wendel > > > > On Dec 5, 2007 10:10 AM, wrote: > > > fazendo o backup deu certo sim... percebi também que posso fazer isso > > > em vários arquivos simultaneamente, colocando um ao lado do outro > > > (separando-os por espaço) > > > > > > Uma dúvida: > > > > > > como saber todos os atributos e as respectivas características, como: > > > -p -n -i, etc...? > > > > > > []s, > > > Fernando -- Luiz G. P. de Almeida Analista de Sistemas Laboratório Nacional de Computação Científica / MCT From nferraz em gmail.com Wed Dec 5 06:02:06 2007 From: nferraz em gmail.com (Nelson Ferraz) Date: Wed, 5 Dec 2007 14:02:06 +0000 Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit In-Reply-To: References: Message-ID: <604cec170712050602s5e5584b9u868c6d600a290a53@mail.gmail.com> > Algumas vezes eu acabo escrevendo código Perl para ler as linhas de um > arquivo e validar o leiaute de arquivos texto. Inevitavelmente os programas > acabam ficando todos muito parecidos, então resolvi abstrair isso um pouco e > criar módulos Perl que me permitissem gerar código Perl para executar testes > automáticos usando Test::More. > > Para isso eu crio um arquivo XML com os meta dados. Um script Perl > interpreta isso e, utilizando os módulos, gera o código Perl para testar > esse arquivo específico. Depois é só executar outro script apontando um > arquivo em questão, que deverá estar no leiaute definido ou o teste irá > gerar erro em algum ponto. Uia, Isso parece bastante com o AppML. Mas eu não usava o TT, e então o código era um pouco difícil de ler. Vou te mandar em PVT um outro projeto que eu iniciei, o SQL::Translator::Producer::App -- que utiliza o SQL::Translator para produzir código de aplicações web baseadas em Catalyst. (Ainda não está funcional, então vou mandar apenas para que você possa tomar o código como exemplo.) []s Nelson From edencardim em gmail.com Wed Dec 5 06:31:37 2007 From: edencardim em gmail.com (eden) Date: Wed, 5 Dec 2007 11:31:37 -0300 Subject: [Cascavel-pm] =?iso-8859-1?q?otimiza=E7=E3o_em_manipula=E7=E3o_de?= =?iso-8859-1?q?_texto?= In-Reply-To: <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> References: <645915.21652.qm@web44809.mail.sp1.yahoo.com> <006801c836a3$f5a353b0$0401a8c0@servidorliz> <009e01c83737$ca2e9ac0$0401a8c0@servidorliz> Message-ID: <3de55ead0712050631p1445fc26n29c65a457e55e89a@mail.gmail.com> On Dec 5, 2007 9:10 AM, wrote: > > > fazendo o backup deu certo sim... percebi também que posso fazer isso em > vários arquivos simultaneamente, colocando um ao lado do outro (separando-os > por espaço) > > Uma dúvida: > > como saber todos os atributos e as respectivas características, como: > -p -n -i, etc...? perldoc perlrun -- edenc.vox.com From glasswalk3r em yahoo.com.br Wed Dec 5 08:08:38 2007 From: glasswalk3r em yahoo.com.br (Alceu R. de Freitas Jr.) Date: Wed, 5 Dec 2007 13:08:38 -0300 (ART) Subject: [Cascavel-pm] uso de __DATA__ com hierarquia de classes e Template Toolkit Message-ID: <173970.29351.qm@web30814.mail.mud.yahoo.com> Oi Luis, Eu já mudei meu endereço cadastrado na lista... de volta para o Yahoo!, daonde nunca deveria ter saído. Bem, eu havia colocado os códigos relacionados no email original, mas aí vai de novo o carinha que lê o __DATA__: package File::Validate::Template; use strict; use warnings; use base 'Class::Accessor'; use Carp qw(confess); __PACKAGE__->follow_best_practice(); __PACKAGE__->mk_ro_accessors(qw(code)); sub new { my $class = shift; confess "class is an obligatory parameter" unless ( defined($class) ); my $self = { code => undef }; bless $self, $class; $self->{code} = $self->_read_code(); return $self; } sub _read_code { my $self = shift; my $buffer; # turn on slurp mode local $/; my $handle = ref($self) . '::DATA'; $buffer = <$handle>; confess "No data from $handle file handle" unless ( defined($buffer) ); return \$buffer; } 1; Enfim, acho que um inline não resolveria não... um dos motivos de usar o TT é poder ter código razoavelmente identado. Sobre a idéia de instalar os arquivos de template junto com os arquivos dos módulos pode ser uma boa idéia. Eu concordo que está ficando complicado demais já. Algum exemplo sobre como usar Config.pm e FindBin.pm para fazer isso? Digo, como eu farei para obter dinamicamente o path daonde está os templates e passar para o objeto template processar? []'s Alceu Rodrigues de Freitas Junior -------------------------------------- glasswalk3r em yahoo.com.br http://www.imortais.cjb.net ----------------------------------------------------------------------- A well-used door needs no oil on its hinges. A swift-flowing stream does not grow stagnant. Neither sound nor thoughts can travel through a vacuum. Software rots if not used. These are great mysteries -- The Tao Of Programming, 5.1 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ From fernandolouis em terra.com.br Wed Dec 5 08:34:20 2007 From: fernandolouis em terra.com.br (fernandolouis em terra.com.br) Date: Wed, 5 Dec 2007 14:34:20 -0200 Subject: [Cascavel-pm] [OT] Gambiarra do Word References: <645915.21652.qm@web44809.mail.sp1.yahoo.com><006801c836a3$f5a353b0$0401a8c0@servidorliz><009e01c83737$ca2e9ac0$0401a8c0@servidorliz> <3de55ead0712050631p1445fc26n29c65a457e55e89a@mail.gmail.com> Message-ID: <001d01c8375c$b0e75a50$0401a8c0@servidorliz> Amigos, Sabiam que os documentos do word, não passam de documentos xhtml? o cabeçalho do código-fonte é: Muitos textos do word, ao invés de "nº", aparecem "no", só que não percebe-se isso pq o Word usa no "o": o Alguém sabe como substituir automaticamente: "o" por "º" Tenho centenas de arquivos para fazer essa substituição. E desejo fazer isso em todos simultaneamente. É que quando copio um texto do word pro bloco de notas, tudo fica errado, por exemplo: O texto fica assim: "A casa no 5, lote no 23 está sob processo no 1.222". e deveria colar assim: "A casa nº 5, lote nº 23 está sob processo nº 1.222". []s, Fernando From joaohf em gmail.com Wed Dec 5 08:41:45 2007 From: joaohf em gmail.com (=?UTF-8?Q?Jo=C3=A3o_Henrique_Freitas?=) Date: Wed, 5 Dec 2007 14:41:45 -0200 Subject: [Cascavel-pm] Win32 PerfMon In-Reply-To: <88e33d220712050420q7bdd8781u1af1478fda770702@mail.gmail.com> References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com> <88e33d220710171142r27e43641ge09fa869466503c1@mail.gmail.com> <12d1f4ee0710221931i2544fc82yea8fbe67784ab2d@mail.gmail.com> <88e33d220710230306p5fab8942p9189cc7ae1ab4b10@mail.gmail.com> <12d1f4ee0710230914r78711430y681b38be9f399298@mail.gmail.com> <88e33d220710261249o7a4296abj1a07495ede6c26bd@mail.gmail.com> <12d1f4ee0710300458g2d5c3edyddfc9691f22f002e@mail.gmail.com> <88e33d220710300541j390e1d70w40fe504d948c896d@mail.gmail.com> <12d1f4ee0711291946k2c46efc2g3acc6dce3383b1b@mail.gmail.com> <88e33d220712050420q7bdd8781u1af1478fda770702@mail.gmail.com> Message-ID: <88e33d220712050841l64c8b62dt7fcb8a3c85ec61a6@mail.gmail.com> Solli, o patch funcionou. Anexo o script de teste, a saída e o erro que encontrei mas que não alterou os resultados. On Dec 5, 2007 10:20 AM, João Henrique Freitas wrote: > Ok, vou testar. > > Agradeço > > On Nov 30, 2007 1:46 AM, Solli Honorio wrote: > > > Cara, demorou um pouco mas eu fiz as alterações para resolver os bugs. > > Eu abrí um chamado no cpan com as informações e a correção, agora vamos ver > > no que vai dar. > > > > Abraços, > > > > Solli M. Honório > > > > On Oct 30, 2007 10:41 AM, João Henrique Freitas > > wrote: > > > > > Olá > > > > > > Bom, ontem gastei uma tarde inteira com o PerMon. A princípio as > > > coisas funcionaram mas quando comecei a analisar bem, também encontrei > > > pr