From lorn.br em gmail.com  Mon Aug  2 07:53:28 2010
From: lorn.br em gmail.com (Lindolfo "Lorn" Rodrigues)
Date: Mon, 2 Aug 2010 11:53:28 -0300
Subject: [Cascavel-pm] The Perl 6 community has the structure of a MMORPG
In-Reply-To: <AANLkTikM7Z1ByRs_HV-+53kFjGH9bTmVd1ZM-B8b2PVj@mail.gmail.com>
References: <AANLkTikM7Z1ByRs_HV-+53kFjGH9bTmVd1ZM-B8b2PVj@mail.gmail.com>
Message-ID: <AANLkTim+7v3v-mzre2tU2vzsCpBEBw=HzD0=355YL=5P@mail.gmail.com>

Passei esse link outro dia no irc :)

Tem outro do mesmo cara, masak, em que ele comenta um log do #perl6 da
freenode ( o Larry Wall fica logado lá ) onde um cara fica espantado de ter
conversado com o Larry Wall sem saber :P

http://use.perl.org/~masak/journal/39025

<sjohnson> does anyone know of the -devel mailing list for Perl 6, and if
Larry himself ever reads it?
<wayland76> sjohnson: There's a "Language" list and a "Compilers" list
<skids> He reads perl6-language and also comes here.
<wayland76> Language is for arguing about the Spec. I'm on it, and so is
Larry.
<wayland76> (perl6-language is the "Language" list I mentioned)
<wayland76> I'm not on Compilers, so I can't speak for it
<sjohnson> skids, how often does he come here? what's his nickname when he
does?
<wayland76> lambdabot: @seen TimToady
<lambdabot> TimToady is in #perl6. I last heard TimToady speak 3h 9m 56s
ago.
<skids> sjohnson: you already talked to him, in fact, when you first logged
in.
<sjohnson> wow
<sjohnson> i had no idea that was him!!!
<skids> :-)


Desculpem o cross-post, mas eu acho isso interessante para todos :)



2010/7/31 João C. Coutinho <jc em joaocoutinho.com.br>

> Perlsoal,
>
> vi o link desse post no Twitter (@larsen) e achei a analogia interessante:
>
> "The Perl 6 community has the structure of a MMORPG."
> http://use.perl.org/~masak/journal/39445<http://use.perl.org/%7Emasak/journal/39445>
>
> [ ]'s,
>
> João
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
lorn at lornlab dot org
Lindolfo "Lorn" Rodrigues
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100802/cf8b4f5f/attachment.html>

From daniel.oliveira.mantovani em gmail.com  Tue Aug 10 21:25:50 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 11 Aug 2010 01:25:50 -0300
Subject: [Cascavel-pm] Fwd: [Rio-pm] Entrevista com Larry Wall
In-Reply-To: <AANLkTikfRoETG3nW=B5VJTzfSagopp1NyFkYx0E5CqCi@mail.gmail.com>
References: <AANLkTikfRoETG3nW=B5VJTzfSagopp1NyFkYx0E5CqCi@mail.gmail.com>
Message-ID: <AANLkTik3AZeVCcPJRe=pGLh3Osh1RKnwQukZJchkv4q9@mail.gmail.com>

---------- Forwarded message ----------
From: breno <breno em rio.pm.org>
Date: 2010/8/11
Subject: [Rio-pm] Entrevista com Larry Wall
To: Perl Mongers Rio de Janeiro <rio-pm em pm.org>


A BigThink publicou uma entrevista muito bacana com Larry Wall:

http://bigthink.com/larrywall

A entrevista tem 45 minutos e particularmente acho que vale cada
segundo. De qualquer forma, e/ou para referência futura, está dividida
em vários grupos bacanas:

* Você pode xingar em Perl
* Por que Perl é como uma linguagem humana
* Desenvolvedores Perl são mais sociais que outros desenvolvedores
* Programação de computadores em 5 minutos
* 5 linguagens de programação todo mundo deveria saber
* Hobbits seriam ótimos programadores
* Apple tenta ser a árbitra do bom gosto
* Como programar como Larry Wall

Infelizmente, só em inglês e sem legendas.

[]s

-b
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From roanbrasil em gmail.com  Wed Aug 11 07:49:08 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Wed, 11 Aug 2010 11:49:08 -0300
Subject: [Cascavel-pm] Fwd: [Rio-pm] Entrevista com Larry Wall
In-Reply-To: <AANLkTik3AZeVCcPJRe=pGLh3Osh1RKnwQukZJchkv4q9@mail.gmail.com>
References: <AANLkTikfRoETG3nW=B5VJTzfSagopp1NyFkYx0E5CqCi@mail.gmail.com>
	<AANLkTik3AZeVCcPJRe=pGLh3Osh1RKnwQukZJchkv4q9@mail.gmail.com>
Message-ID: <AANLkTinY8BOzN0_h2DbksS7DNTHz-fQTYAg9XktYjgrE@mail.gmail.com>

Felizmente é em ingles né :-)

Em 11 de agosto de 2010 01:25, Daniel de Oliveira Mantovani <
daniel.oliveira.mantovani em gmail.com> escreveu:

> ---------- Forwarded message ----------
> From: breno <breno em rio.pm.org>
> Date: 2010/8/11
> Subject: [Rio-pm] Entrevista com Larry Wall
> To: Perl Mongers Rio de Janeiro <rio-pm em pm.org>
>
>
> A BigThink publicou uma entrevista muito bacana com Larry Wall:
>
> http://bigthink.com/larrywall
>
> A entrevista tem 45 minutos e particularmente acho que vale cada
> segundo. De qualquer forma, e/ou para referência futura, está dividida
> em vários grupos bacanas:
>
> * Você pode xingar em Perl
> * Por que Perl é como uma linguagem humana
> * Desenvolvedores Perl são mais sociais que outros desenvolvedores
> * Programação de computadores em 5 minutos
> * 5 linguagens de programação todo mundo deveria saber
> * Hobbits seriam ótimos programadores
> * Apple tenta ser a árbitra do bom gosto
> * Como programar como Larry Wall
>
> Infelizmente, só em inglês e sem legendas.
>
> []s
>
> -b
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
>
>
> --
> http://www.danielmantovani.com
>
> "If you?ve never written anything thoughtful, then you?ve never had
> any difficult, important, or interesting thoughts. That?s the secret:
> people who don?t write, are people who don?t think."
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100811/adc31ee1/attachment.html>

From breno em rio.pm.org  Fri Aug 13 18:42:43 2010
From: breno em rio.pm.org (breno)
Date: Fri, 13 Aug 2010 22:42:43 -0300
Subject: [Cascavel-pm] Lista Brasil Perl Mongers ativa!
Message-ID: <AANLkTi=oSJzZt0sTsFz5Kjy08bVrtFcYDrLigWLeJnNz@mail.gmail.com>

Oi pessoal!

Desculpem o cross-posting, mas acredito que esse seja um assunto que
interesse a todos:

Após muitos pedidos, finalmente ativamos a lista Brasil Perl Mongers!

http://mail.pm.org/mailman/listinfo/brasil-pm

O objetivo da lista é oferecer um ponto central para usuários,
desenvolvedores e entusiastas da linguagem Perl de programação em todo
o Brasil, de iniciantes a especialistas.

Assim, poderemos organizar melhor a comunidade nacional de Perl,
tirando dúvidas sobre a linguagem, seus módulos, melhores práticas,
tudo o que está acontecendo no cenário nacional e mundial, eventos das
comunidades e muita cultura Perl. E da mesma forma desafogando as
listas regionais, que podem se concentrar nas atividades sociais
locais - evitando também esses meus cross-postings chatos =P

A comunidade nacional de Perl nunca esteve tão unida, e acho que está
mais do que na hora de mostrarmos essa força.

Juntem-se à revolução! Inscrevam-se já :-)


[]s

-b

From roanbrasil em gmail.com  Mon Aug 16 08:07:16 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 12:07:16 -0300
Subject: [Cascavel-pm] Ajuda
Message-ID: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>

Olá pessoal,

Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma arvore
de diretorios baseado em data.

Tenho diretorios que é por dia tipo 20100816, 20100815..

ja fiz um for onde tenho 201008 como default e concatena com um contador do
dia 16 até 1 ai tudo bem.

Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no final
-ERR .

Depois disso outra coisa q ja fiz é expressão regular que ja fiz para pegar
o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
odarquivo senão não faz nada.

Obrigado

-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/bd3ac54f/attachment.html>

From blabos em gmail.com  Mon Aug 16 08:17:07 2010
From: blabos em gmail.com (Blabos de Blebe)
Date: Mon, 16 Aug 2010 12:17:07 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
Message-ID: <AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>

Nâo entendi o que vc está perguntando.

Seria algo relacionado a opendir e readdir?

2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> Olá pessoal,
>
> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma arvore
> de diretorios baseado em data.
>
> Tenho diretorios que é por dia tipo 20100816, 20100815..
>
> ja fiz um for onde tenho 201008 como default e concatena com um contador do
> dia 16 até 1 ai tudo bem.
>
> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no final
> -ERR .
>
> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para pegar
> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
> odarquivo senão não faz nada.
>
> Obrigado
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From breno em rio.pm.org  Mon Aug 16 08:40:58 2010
From: breno em rio.pm.org (breno)
Date: Mon, 16 Aug 2010 12:40:58 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
Message-ID: <AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>

Roan,

também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
Blabos está no caminho certo. Dê uma olhada em:

http://perldoc.perl.org/functions/readdir.html

E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
exatamente o seu problema em mãos :-)

[]s

-b

2010/8/16 Blabos de Blebe <blabos em gmail.com>:
> Nâo entendi o que vc está perguntando.
>
> Seria algo relacionado a opendir e readdir?
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> Olá pessoal,
>>
>> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma arvore
>> de diretorios baseado em data.
>>
>> Tenho diretorios que é por dia tipo 20100816, 20100815..
>>
>> ja fiz um for onde tenho 201008 como default e concatena com um contador do
>> dia 16 até 1 ai tudo bem.
>>
>> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no final
>> -ERR .
>>
>> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para pegar
>> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
>> odarquivo senão não faz nada.
>>
>> Obrigado
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From andregarciacarneiro em gmail.com  Mon Aug 16 09:19:27 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 13:19:27 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
Message-ID: <AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>

Roan

Esse módulo pode te ajudar com os diretórios:


http://search.cpan.org/~kwilliams/Path-Class-0.19/lib/Path/Class/Dir.pm



>Depois disso outra coisa q ja fiz é expressão regular que ja fiz para pegar
o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o >nome
odarquivo senão não faz nada.


Acho que a sua expressão regular ficaria melhor assim: '/0$/'. Mas estou
levando em consideração que você quer encontrar um zero no final do
arquivo.

Porque vc está usando go no final ????




Cheers!


-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/3da4b806/attachment.html>

From roanbrasil em gmail.com  Mon Aug 16 10:30:35 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 14:30:35 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
Message-ID: <AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>

Seguinte,

Imagina que tenho a pasta chamada 201008 e meu script perl está nessa pasta.
201008
      |_____20100801
      |_____20100802
      |_____20100803
      |_____...
      |_____script.pl

Dentro de cada pasta existem vários arquivos com nome que eu desconheço, mas
que tem o final -ERR.
por exemplo

na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR  YYYYYYYY-ERR e
ZZZZZZZZ-ERR

quero abrir todos esses arquivos com final ERR e verificar se ao final de
CADA LINHA possui 000000000
se possuir no final de cada linha 000000000, imprimir o nome do arquivo que
tiver todas linhas com 000000000. Se alguma linha, no FINAL dela tiver algum
numero onde a sequencia seja diferente de zero não imprimi.

Exemplo.

File XXXXXXX-ERR
linha 1  teste blabla43 000000000
linha 2  teste blabla32 000000000
linha 3  teste blabla12 000000000
...
linha n xxxxxxxxxxx   000000000


File YYYYYY-ERR
linha 1  teste blabla43 *000000200*
linha 2  teste blabla32 000000000
linha 3  teste blabla12 000000000
...
linha n xxxxxxxxxxx   000000000


No arquivo XXXXXX todas ultimas colunas são com sequencia zero.

Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo XXXXXX-ERR e
não o YYYYYY-ERR.

Deu para entender?


Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:

> Roan,
>
> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
> Blabos está no caminho certo. Dê uma olhada em:
>
> http://perldoc.perl.org/functions/readdir.html
>
> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
> exatamente o seu problema em mãos :-)
>
> []s
>
> -b
>
> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
> > Nâo entendi o que vc está perguntando.
> >
> > Seria algo relacionado a opendir e readdir?
> >
> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >> Olá pessoal,
> >>
> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma
> arvore
> >> de diretorios baseado em data.
> >>
> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
> >>
> >> ja fiz um for onde tenho 201008 como default e concatena com um contador
> do
> >> dia 16 até 1 ai tudo bem.
> >>
> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no
> final
> >> -ERR .
> >>
> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para
> pegar
> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
> >> odarquivo senão não faz nada.
> >>
> >> Obrigado
> >>
> >> --
> >> Atenciosamente,
> >>
> >> Roan Brasil Monteiro
> >> http://roanbrasil.wordpress.com/
> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>
> >>
> >> _______________________________________________
> >> Cascavel-pm mailing list
> >> Cascavel-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/01061824/attachment-0001.html>

From roanbrasil em gmail.com  Mon Aug 16 10:39:10 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 14:39:10 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
Message-ID: <AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>

André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um amigo
que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele perguntou se
dava pra fazer sem módulo, como o Shell Script.

2010/8/16 Andre Carneiro <andregarciacarneiro em gmail.com>

> Roan
>
> Esse módulo pode te ajudar com os diretórios:
>
>
> http://search.cpan.org/~kwilliams/Path-Class-0.19/lib/Path/Class/Dir.pm<http://search.cpan.org/%7Ekwilliams/Path-Class-0.19/lib/Path/Class/Dir.pm>
>
>
>
> >Depois disso outra coisa q ja fiz é expressão regular que ja fiz para
> pegar o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o
> >nome odarquivo senão não faz nada.
>
>
> Acho que a sua expressão regular ficaria melhor assim: '/0$/'. Mas estou
> levando em consideração que você quer encontrar um zero no final do
> arquivo.
>
> Porque vc está usando go no final ????
>
>
>
>
> Cheers!
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/b9592f36/attachment.html>

From acid06 em gmail.com  Mon Aug 16 10:42:39 2010
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Mon, 16 Aug 2010 14:42:39 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
Message-ID: <AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>

2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um amigo
> que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
> Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele perguntou se
> dava pra fazer sem módulo, como o Shell Script.

Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor sentido.
Se você quer simplesmente ganhar a aposta, copie e cole o código do
módulo no seu script.

-Nilson

From daniel.oliveira.mantovani em gmail.com  Mon Aug 16 10:49:06 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 16 Aug 2010 14:49:06 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
Message-ID: <AANLkTinXEC_F6gcUVZJC-QwH4thLed4faYOeea59Y_f_@mail.gmail.com>

2010/8/16 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>:
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um amigo
>> que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>> Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele perguntou se
>> dava pra fazer sem módulo, como o Shell Script.
>
> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor sentido.
> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> módulo no seu script.

Além do que o Nilson disse, isso não tem nada há ver com linguagens e
sim com lógica básica de programação.


>
> -Nilson
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From roanbrasil em gmail.com  Mon Aug 16 10:50:06 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 14:50:06 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
Message-ID: <AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>

:-(

Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr. <
acid06 em gmail.com> escreveu:

> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um amigo
> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele perguntou
> se
> > dava pra fazer sem módulo, como o Shell Script.
>
> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> sentido.
> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> módulo no seu script.
>
> -Nilson
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/171e05ac/attachment.html>

From vandersons em gmail.com  Mon Aug 16 11:07:27 2010
From: vandersons em gmail.com (Vanderson Sampaio)
Date: Mon, 16 Aug 2010 14:07:27 -0400
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
Message-ID: <AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>

Falando em coisas que não fazem sentido, grosseria é uma delas. Há
tempos que observo esse comportamento em membros do grupo e isso
parece não avançar. Dá-me a impressão de que ser e-truculento é uma
espécie de demarcação de território... Conduta socialmente inadequada
e dispensável.
O companheiro fez uma pergunta, quem puder ajudar, responde, quem não
quiser, não se manifesta. Só não dá para ficar minando iniciativas
que, mesmo de forma rudimentar, tenham como finalidade o aprendizado.
#trollfail

Em 16/08/10, Nilson Santos Figueiredo Jr.<acid06 em gmail.com> escreveu:
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um amigo
>> que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>> Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele perguntou
>> se
>> dava pra fazer sem módulo, como o Shell Script.
>
> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> sentido.
> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> módulo no seu script.
>
> -Nilson
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

-- 
Enviado do meu celular

MSc Vanderson Sampaio
Biólogo - FVS/AM

From felipe.vinturini em gmail.com  Mon Aug 16 11:07:30 2010
From: felipe.vinturini em gmail.com (Felipe Vinturini)
Date: Mon, 16 Aug 2010 15:07:30 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
Message-ID: <AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>

*Ganhei! =o)*
====================================================
find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
while read filen
do
fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
fileNumRowsLT=`expr ${fileNumRows} - 1`
 fileNumZeros=`egrep -c '000000000$' "${filen}"`
 if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
 then
echo "File has erros: [${filen}]."
fi
done
====================================================

2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>

> :-(
>
> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr. <
> acid06 em gmail.com> escreveu:
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>> amigo
>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>> perguntou se
>> > dava pra fazer sem módulo, como o Shell Script.
>>
>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>> sentido.
>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>> módulo no seu script.
>>
>> -Nilson
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> 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/20100816/72182150/attachment-0001.html>

From roanbrasil em gmail.com  Mon Aug 16 11:14:13 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 15:14:13 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
Message-ID: <AANLkTikwP28d3G_0QRs7rvJ+b_xNDmaA=9iGDmnnLJ1t@mail.gmail.com>

Concordo....

Em 16 de agosto de 2010 15:07, Vanderson Sampaio <vandersons em gmail.com>escreveu:

> Falando em coisas que não fazem sentido, grosseria é uma delas. Há
> tempos que observo esse comportamento em membros do grupo e isso
> parece não avançar. Dá-me a impressão de que ser e-truculento é uma
> espécie de demarcação de território... Conduta socialmente inadequada
> e dispensável.
> O companheiro fez uma pergunta, quem puder ajudar, responde, quem não
> quiser, não se manifesta. Só não dá para ficar minando iniciativas
> que, mesmo de forma rudimentar, tenham como finalidade o aprendizado.
> #trollfail
>
> Em 16/08/10, Nilson Santos Figueiredo Jr.<acid06 em gmail.com> escreveu:
> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >> André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
> amigo
> >> que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
> >> Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
> perguntou
> >> se
> >> dava pra fazer sem módulo, como o Shell Script.
> >
> > Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> > sentido.
> > Se você quer simplesmente ganhar a aposta, copie e cole o código do
> > módulo no seu script.
> >
> > -Nilson
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
> --
> Enviado do meu celular
>
> MSc Vanderson Sampaio
> Biólogo - FVS/AM
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/4fddc7f9/attachment.html>

From roanbrasil em gmail.com  Mon Aug 16 11:14:50 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 15:14:50 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
Message-ID: <AANLkTi=aLxA=4pioXKx04Z2RrD5t=DucbqOyM2o+eXsL@mail.gmail.com>

Felipe,

Ainda ganha quem fizer o menor código?

2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>

> *Ganhei! =o)*
> ====================================================
> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
> while read filen
> do
> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
> fileNumRowsLT=`expr ${fileNumRows} - 1`
>  fileNumZeros=`egrep -c '000000000$' "${filen}"`
>  if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
>  then
> echo "File has erros: [${filen}]."
> fi
> done
> ====================================================
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> :-(
>>
>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr. <
>> acid06 em gmail.com> escreveu:
>>
>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>>> amigo
>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>>> perguntou se
>>> > dava pra fazer sem módulo, como o Shell Script.
>>>
>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>>> sentido.
>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>>> módulo no seu script.
>>>
>>> -Nilson
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> 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
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/b5e2536f/attachment.html>

From acid06 em gmail.com  Mon Aug 16 11:16:37 2010
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Mon, 16 Aug 2010 15:16:37 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
Message-ID: <AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>

2010/8/16 Vanderson Sampaio <vandersons em gmail.com>:
> Falando em coisas que não fazem sentido, grosseria é uma delas. Há
> tempos que observo esse comportamento em membros do grupo e isso
> parece não avançar. Dá-me a impressão de que ser e-truculento é uma
> espécie de demarcação de território... Conduta socialmente inadequada
> e dispensável.

Peço desculpas se o que eu escrevi "soou" como grosseria, não era a intenção.

A intenção realmente era de apontar que as bibliotecas são escritas em
Perl. Então, como o objetivo da aposta é "fazer somente usando Perl",
usar essas bibliotecas não tem problema nenhum.

Inclusive, caso a sugestão de copiar o código seja realmente ofensiva,
sugiro, então, que você dê uma olhada no código da biblioteca citada
acima pra aprender como o autor fez e crie uma solução similar - é
tudo Perl!

-Nilson

From vandersons em gmail.com  Mon Aug 16 11:26:26 2010
From: vandersons em gmail.com (Vanderson Sampaio)
Date: Mon, 16 Aug 2010 14:26:26 -0400
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
Message-ID: <AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>

Digna de aplausos a atitude do Nilson! Estou sendo sincero.
Dada a retratação pública, quem deve desculpas agora sou eu.
Se a intenção do texto também era educativa, me desculpe pela generalização.
Entendo que as vezes escrevemos algo na melhor das intenções e o leitor
interpreta de forma diferente daquela que escrevemos. Coisas da linguagem
escrita.
Desculpas pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!
Abraços,


2010/8/16 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>

> 2010/8/16 Vanderson Sampaio <vandersons em gmail.com>:
> > Falando em coisas que não fazem sentido, grosseria é uma delas. Há
> > tempos que observo esse comportamento em membros do grupo e isso
> > parece não avançar. Dá-me a impressão de que ser e-truculento é uma
> > espécie de demarcação de território... Conduta socialmente inadequada
> > e dispensável.
>
> Peço desculpas se o que eu escrevi "soou" como grosseria, não era a
> intenção.
>
> A intenção realmente era de apontar que as bibliotecas são escritas em
> Perl. Então, como o objetivo da aposta é "fazer somente usando Perl",
> usar essas bibliotecas não tem problema nenhum.
>
> Inclusive, caso a sugestão de copiar o código seja realmente ofensiva,
> sugiro, então, que você dê uma olhada no código da biblioteca citada
> acima pra aprender como o autor fez e crie uma solução similar - é
> tudo Perl!
>
> -Nilson
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
MSc Vanderson Sampaio
Biólogo - FVS/AM
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/c4dbcb65/attachment-0001.html>

From andregarciacarneiro em gmail.com  Mon Aug 16 11:30:22 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 15:30:22 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
Message-ID: <AANLkTimVgyCNzKXFd91ro3+EfFWywgzx_PmZd9n2PPMF@mail.gmail.com>

Roan


Ignora as bobagens...


Você pode usar readpipe e os comandos que você usaria em shell, e receber
isso num array, e aí é só manipular o array.

Você pode usar opendir e readdir, de forma vagamente semelhante como você
abre um arquivo:

<code>

use strict;
use warnings;

opendir(DIR , $meudir) or die "Nao foi possivel abrir o dir $meudir $!";


</code>




2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>

> :-(
>
> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr. <
> acid06 em gmail.com> escreveu:
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>> amigo
>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>> perguntou se
>> > dava pra fazer sem módulo, como o Shell Script.
>>
>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>> sentido.
>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>> módulo no seu script.
>>
>> -Nilson
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/d36d242c/attachment.html>

From andregarciacarneiro em gmail.com  Mon Aug 16 11:45:15 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 15:45:15 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimVgyCNzKXFd91ro3+EfFWywgzx_PmZd9n2PPMF@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTimVgyCNzKXFd91ro3+EfFWywgzx_PmZd9n2PPMF@mail.gmail.com>
Message-ID: <AANLkTik-EaqMNME8-ZaqHLupJyY=AbsmcaB-iUpjseg0@mail.gmail.com>

Roan

Desculpe, sem querer eu submeti o form do e-mail... saco!



<code>

use strict;
use warnings;


opendir(DIR , "/home/andre") or die;
map{ #PROCURE O QUE VC QUER COM $_ aqui

} readdir DIR;


closedir DIR;




</code>


Em 16 de agosto de 2010 15:30, Andre Carneiro <andregarciacarneiro em gmail.com
> escreveu:

> Roan
>
>
> Ignora as bobagens...
>
>
> Você pode usar readpipe e os comandos que você usaria em shell, e receber
> isso num array, e aí é só manipular o array.
>
> Você pode usar opendir e readdir, de forma vagamente semelhante como você
> abre um arquivo:
>
> <code>
>
> use strict;
> use warnings;
>
> opendir(DIR , $meudir) or die "Nao foi possivel abrir o dir $meudir $!";
>
>
> </code>
>
>
>
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> :-(
>>
>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr. <
>> acid06 em gmail.com> escreveu:
>>
>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>>> amigo
>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>>> perguntou se
>>> > dava pra fazer sem módulo, como o Shell Script.
>>>
>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>>> sentido.
>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>>> módulo no seu script.
>>>
>>> -Nilson
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/5b10ea63/attachment.html>

From andregarciacarneiro em gmail.com  Mon Aug 16 11:47:12 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 15:47:12 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
Message-ID: <AANLkTikOjVyBe3j+71-4X-+XNdANueyh68mDL7=JxQ5A@mail.gmail.com>

Tá... bacana!


Agora escreve alguma coisa pra ajudar o Roan... ;-)




Cheers!



2010/8/16 Vanderson Sampaio <vandersons em gmail.com>

> Digna de aplausos a atitude do Nilson! Estou sendo sincero.
> Dada a retratação pública, quem deve desculpas agora sou eu.
> Se a intenção do texto também era educativa, me desculpe pela
> generalização.
> Entendo que as vezes escrevemos algo na melhor das intenções e o leitor
> interpreta de forma diferente daquela que escrevemos. Coisas da linguagem
> escrita.
> Desculpas pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!
> Abraços,
>
>
> 2010/8/16 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>
>
> 2010/8/16 Vanderson Sampaio <vandersons em gmail.com>:
>> > Falando em coisas que não fazem sentido, grosseria é uma delas. Há
>> > tempos que observo esse comportamento em membros do grupo e isso
>> > parece não avançar. Dá-me a impressão de que ser e-truculento é uma
>> > espécie de demarcação de território... Conduta socialmente inadequada
>> > e dispensável.
>>
>> Peço desculpas se o que eu escrevi "soou" como grosseria, não era a
>> intenção.
>>
>> A intenção realmente era de apontar que as bibliotecas são escritas em
>> Perl. Então, como o objetivo da aposta é "fazer somente usando Perl",
>> usar essas bibliotecas não tem problema nenhum.
>>
>> Inclusive, caso a sugestão de copiar o código seja realmente ofensiva,
>> sugiro, então, que você dê uma olhada no código da biblioteca citada
>> acima pra aprender como o autor fez e crie uma solução similar - é
>> tudo Perl!
>>
>> -Nilson
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> MSc Vanderson Sampaio
> Biólogo - FVS/AM
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/5336a52a/attachment.html>

From gabriel.vieira em gmail.com  Mon Aug 16 11:58:51 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Mon, 16 Aug 2010 15:58:51 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
Message-ID: <AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>

GOOOOOOOOOOOOOOOOLFFFFFF

perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'

55

2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
> Ganhei! =o)
> ====================================================
> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
> while read filen
> do
> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
> fileNumRowsLT=`expr ${fileNumRows} - 1`
> fileNumZeros=`egrep -c '000000000$' "${filen}"`
> if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
> then
> echo "File has erros: [${filen}]."
> fi
> done
> ====================================================
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>
>> :-(
>>
>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
>> <acid06 em gmail.com> escreveu:
>>>
>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>>> > amigo
>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>>> > perguntou se
>>> > dava pra fazer sem módulo, como o Shell Script.
>>>
>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>>> sentido.
>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>>> módulo no seu script.
>>>
>>> -Nilson
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> 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
>



-- 
Gabriel Vieira

From andregarciacarneiro em gmail.com  Mon Aug 16 12:03:24 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 16:03:24 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
Message-ID: <AANLkTik3wTNTAyKBnjc_m4O4DUuS_M+2oBEBtGvmnO9f@mail.gmail.com>

Isso aqui eu nunca tinha visto

<*-ERR>

Pode esclarecer???




Em 16 de agosto de 2010 15:58, Gabriel Vieira
<gabriel.vieira em gmail.com>escreveu:

> GOOOOOOOOOOOOOOOOLFFFFFF
>
> perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
>
> 55
>
> 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
> > Ganhei! =o)
> > ====================================================
> > find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
> > while read filen
> > do
> > fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
> > fileNumRowsLT=`expr ${fileNumRows} - 1`
> > fileNumZeros=`egrep -c '000000000$' "${filen}"`
> > if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
> > then
> > echo "File has erros: [${filen}]."
> > fi
> > done
> > ====================================================
> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
> >>
> >> :-(
> >>
> >> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
> >> <acid06 em gmail.com> escreveu:
> >>>
> >>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
> >>> > amigo
> >>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que
> Shell
> >>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
> >>> > perguntou se
> >>> > dava pra fazer sem módulo, como o Shell Script.
> >>>
> >>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> >>> sentido.
> >>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> >>> módulo no seu script.
> >>>
> >>> -Nilson
> >>> _______________________________________________
> >>> Cascavel-pm mailing list
> >>> Cascavel-pm em pm.org
> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>
> >>
> >>
> >> --
> >> Atenciosamente,
> >>
> >> Roan Brasil Monteiro
> >> http://roanbrasil.wordpress.com/
> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>
> >>
> >> _______________________________________________
> >> 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
> >
>
>
>
> --
> Gabriel Vieira
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/dab47e3c/attachment.html>

From breno em rio.pm.org  Mon Aug 16 12:05:02 2010
From: breno em rio.pm.org (breno)
Date: Mon, 16 Aug 2010 16:05:02 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
Message-ID: <AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>

Acho q tá errado Gabriel, ele diz quais não tem todas as linhas
terminando com 9 zeros, não o contrário.

Ou entendi errado?

2010/8/16 Gabriel Vieira <gabriel.vieira em gmail.com>:
> GOOOOOOOOOOOOOOOOLFFFFFF
>
> perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
>
> 55
>
> 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
>> Ganhei! =o)
>> ====================================================
>> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
>> while read filen
>> do
>> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
>> fileNumRowsLT=`expr ${fileNumRows} - 1`
>> fileNumZeros=`egrep -c '000000000$' "${filen}"`
>> if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
>> then
>> echo "File has erros: [${filen}]."
>> fi
>> done
>> ====================================================
>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>
>>> :-(
>>>
>>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
>>> <acid06 em gmail.com> escreveu:
>>>>
>>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>>>> > amigo
>>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>>>> > perguntou se
>>>> > dava pra fazer sem módulo, como o Shell Script.
>>>>
>>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>>>> sentido.
>>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>>>> módulo no seu script.
>>>>
>>>> -Nilson
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>>
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> http://roanbrasil.wordpress.com/
>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>>
>>> _______________________________________________
>>> 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
>>
>
>
>
> --
> Gabriel Vieira
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From roanbrasil em gmail.com  Mon Aug 16 12:05:10 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 16:05:10 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikOjVyBe3j+71-4X-+XNdANueyh68mDL7=JxQ5A@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	<AANLkTikOjVyBe3j+71-4X-+XNdANueyh68mDL7=JxQ5A@mail.gmail.com>
Message-ID: <AANLkTimtiH17oPg65LDnQ5aP=wBkNmQKPmcQi_Jfi+y+@mail.gmail.com>

André,

O Gabriel Vieira da lista me mandou via GOOGLE TALK uma massa

perl -e'map{open$x,$_;print $_.$/ if grep!/0{9}$/,<$x>}<*-ERR>'

parecida com a sua...
:-)

2010/8/16 Andre Carneiro <andregarciacarneiro em gmail.com>

> Tá... bacana!
>
>
> Agora escreve alguma coisa pra ajudar o Roan... ;-)
>
>
>
>
> Cheers!
>
>
>
> 2010/8/16 Vanderson Sampaio <vandersons em gmail.com>
>
>> Digna de aplausos a atitude do Nilson! Estou sendo sincero.
>> Dada a retratação pública, quem deve desculpas agora sou eu.
>> Se a intenção do texto também era educativa, me desculpe pela
>> generalização.
>> Entendo que as vezes escrevemos algo na melhor das intenções e o leitor
>> interpreta de forma diferente daquela que escrevemos. Coisas da linguagem
>> escrita.
>> Desculpas pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!
>> Abraços,
>>
>>
>> 2010/8/16 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>
>>
>> 2010/8/16 Vanderson Sampaio <vandersons em gmail.com>:
>>> > Falando em coisas que não fazem sentido, grosseria é uma delas. Há
>>> > tempos que observo esse comportamento em membros do grupo e isso
>>> > parece não avançar. Dá-me a impressão de que ser e-truculento é uma
>>> > espécie de demarcação de território... Conduta socialmente inadequada
>>> > e dispensável.
>>>
>>> Peço desculpas se o que eu escrevi "soou" como grosseria, não era a
>>> intenção.
>>>
>>> A intenção realmente era de apontar que as bibliotecas são escritas em
>>> Perl. Então, como o objetivo da aposta é "fazer somente usando Perl",
>>> usar essas bibliotecas não tem problema nenhum.
>>>
>>> Inclusive, caso a sugestão de copiar o código seja realmente ofensiva,
>>> sugiro, então, que você dê uma olhada no código da biblioteca citada
>>> acima pra aprender como o autor fez e crie uma solução similar - é
>>> tudo Perl!
>>>
>>> -Nilson
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> MSc Vanderson Sampaio
>> Biólogo - FVS/AM
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/b7fcbf37/attachment.html>

From breno em rio.pm.org  Mon Aug 16 12:05:39 2010
From: breno em rio.pm.org (breno)
Date: Mon, 16 Aug 2010 16:05:39 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTik3wTNTAyKBnjc_m4O4DUuS_M+2oBEBtGvmnO9f@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTik3wTNTAyKBnjc_m4O4DUuS_M+2oBEBtGvmnO9f@mail.gmail.com>
Message-ID: <AANLkTikaCu3dGhOidLrJgm+kW4oGmf3Xm2TM3G-Uz5BD@mail.gmail.com>

2010/8/16 Andre Carneiro <andregarciacarneiro em gmail.com>:
> Isso aqui eu nunca tinha visto
> <*-ERR>
> Pode esclarecer???
>

file glob :-)

No caso, "-ERR" é a extensão q ele pediu.

[]s

-b

From roanbrasil em gmail.com  Mon Aug 16 12:05:43 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 16:05:43 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
Message-ID: <AANLkTim12d1Pq=9=4DHUbU58zKASnVeYA7vkH1u01zXm@mail.gmail.com>

Valeu Gabriel  e André, ajudaram \o/

Gabriel++++++++++;
André++++++++;

Em 16 de agosto de 2010 15:58, Gabriel Vieira
<gabriel.vieira em gmail.com>escreveu:

> GOOOOOOOOOOOOOOOOLFFFFFF
>
> perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
>
> 55
>
> 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
> > Ganhei! =o)
> > ====================================================
> > find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
> > while read filen
> > do
> > fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
> > fileNumRowsLT=`expr ${fileNumRows} - 1`
> > fileNumZeros=`egrep -c '000000000$' "${filen}"`
> > if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
> > then
> > echo "File has erros: [${filen}]."
> > fi
> > done
> > ====================================================
> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
> >>
> >> :-(
> >>
> >> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
> >> <acid06 em gmail.com> escreveu:
> >>>
> >>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
> >>> > amigo
> >>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que
> Shell
> >>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
> >>> > perguntou se
> >>> > dava pra fazer sem módulo, como o Shell Script.
> >>>
> >>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> >>> sentido.
> >>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> >>> módulo no seu script.
> >>>
> >>> -Nilson
> >>> _______________________________________________
> >>> Cascavel-pm mailing list
> >>> Cascavel-pm em pm.org
> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>
> >>
> >>
> >> --
> >> Atenciosamente,
> >>
> >> Roan Brasil Monteiro
> >> http://roanbrasil.wordpress.com/
> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>
> >>
> >> _______________________________________________
> >> 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
> >
>
>
>
> --
> Gabriel Vieira
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/ccdfbbc1/attachment.html>

From roanbrasil em gmail.com  Mon Aug 16 12:07:14 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 16 Aug 2010 16:07:14 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
Message-ID: <AANLkTim0RzT7t+u496O7WiUBhQ25hVPWnnMKUJsboz0A@mail.gmail.com>

é realmente trouxe os arquivos diferentes de zeros, na verdade é o contrario



hehehehehe

Em 16 de agosto de 2010 16:05, breno <breno em rio.pm.org> escreveu:

> Acho q tá errado Gabriel, ele diz quais não tem todas as linhas
> terminando com 9 zeros, não o contrário.
>
> Ou entendi errado?
>
> 2010/8/16 Gabriel Vieira <gabriel.vieira em gmail.com>:
> > GOOOOOOOOOOOOOOOOLFFFFFF
> >
> > perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
> >
> > 55
> >
> > 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
> >> Ganhei! =o)
> >> ====================================================
> >> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
> >> while read filen
> >> do
> >> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
> >> fileNumRowsLT=`expr ${fileNumRows} - 1`
> >> fileNumZeros=`egrep -c '000000000$' "${filen}"`
> >> if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
> >> then
> >> echo "File has erros: [${filen}]."
> >> fi
> >> done
> >> ====================================================
> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
> >>>
> >>> :-(
> >>>
> >>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
> >>> <acid06 em gmail.com> escreveu:
> >>>>
> >>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
> >>>> > amigo
> >>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que
> Shell
> >>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
> >>>> > perguntou se
> >>>> > dava pra fazer sem módulo, como o Shell Script.
> >>>>
> >>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
> >>>> sentido.
> >>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
> >>>> módulo no seu script.
> >>>>
> >>>> -Nilson
> >>>> _______________________________________________
> >>>> Cascavel-pm mailing list
> >>>> Cascavel-pm em pm.org
> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>>
> >>>
> >>>
> >>> --
> >>> Atenciosamente,
> >>>
> >>> Roan Brasil Monteiro
> >>> http://roanbrasil.wordpress.com/
> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>>
> >>>
> >>> _______________________________________________
> >>> 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
> >>
> >
> >
> >
> > --
> > Gabriel Vieira
> > _______________________________________________
> > 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
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/bb9296f2/attachment.html>

From andregarciacarneiro em gmail.com  Mon Aug 16 12:09:47 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 16:09:47 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikaCu3dGhOidLrJgm+kW4oGmf3Xm2TM3G-Uz5BD@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTik3wTNTAyKBnjc_m4O4DUuS_M+2oBEBtGvmnO9f@mail.gmail.com>
	<AANLkTikaCu3dGhOidLrJgm+kW4oGmf3Xm2TM3G-Uz5BD@mail.gmail.com>
Message-ID: <AANLkTi=1_nL0BHTscvTpW--V6wyPjmm-B6b2qpgOnvUC@mail.gmail.com>

Não sabia q dava pra usar assim... mais um 'sugar' de Perl... legal!




Valeu!



Em 16 de agosto de 2010 16:05, breno <breno em rio.pm.org> escreveu:

> 2010/8/16 Andre Carneiro <andregarciacarneiro em gmail.com>:
> > Isso aqui eu nunca tinha visto
> > <*-ERR>
> > Pode esclarecer???
> >
>
> file glob :-)
>
> No caso, "-ERR" é a extensão q ele pediu.
>
> []s
>
> -b
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/6434ac92/attachment.html>

From gabriel.vieira em gmail.com  Mon Aug 16 12:10:08 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Mon, 16 Aug 2010 16:10:08 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
Message-ID: <AANLkTimBvKR3yQKW6Q2W=M+S=F5cr_uMnu1D-A+fUPVC@mail.gmail.com>

Eita, agora me perdi

perl -E'map{open$x,$_;say if !grep!/0{9}$/,<$x>}<*-ERR>'

56 :(

2010/8/16 breno <breno em rio.pm.org>:
> Acho q tá errado Gabriel, ele diz quais não tem todas as linhas
> terminando com 9 zeros, não o contrário.
>
> Ou entendi errado?
>
> 2010/8/16 Gabriel Vieira <gabriel.vieira em gmail.com>:
>> GOOOOOOOOOOOOOOOOLFFFFFF
>>
>> perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
>>
>> 55
>>
>> 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
>>> Ganhei! =o)
>>> ====================================================
>>> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
>>> while read filen
>>> do
>>> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
>>> fileNumRowsLT=`expr ${fileNumRows} - 1`
>>> fileNumZeros=`egrep -c '000000000$' "${filen}"`
>>> if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
>>> then
>>> echo "File has erros: [${filen}]."
>>> fi
>>> done
>>> ====================================================
>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>>
>>>> :-(
>>>>
>>>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
>>>> <acid06 em gmail.com> escreveu:
>>>>>
>>>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>>>>> > amigo
>>>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que Shell
>>>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>>>>> > perguntou se
>>>>> > dava pra fazer sem módulo, como o Shell Script.
>>>>>
>>>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o menor
>>>>> sentido.
>>>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>>>>> módulo no seu script.
>>>>>
>>>>> -Nilson
>>>>> _______________________________________________
>>>>> Cascavel-pm mailing list
>>>>> Cascavel-pm em pm.org
>>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>
>>>>
>>>>
>>>> --
>>>> Atenciosamente,
>>>>
>>>> Roan Brasil Monteiro
>>>> http://roanbrasil.wordpress.com/
>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>
>>>>
>>>> _______________________________________________
>>>> 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
>>>
>>
>>
>>
>> --
>> Gabriel Vieira
>> _______________________________________________
>> 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
>



-- 
Gabriel Vieira

From andregarciacarneiro em gmail.com  Mon Aug 16 12:11:57 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 16 Aug 2010 16:11:57 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTim0RzT7t+u496O7WiUBhQ25hVPWnnMKUJsboz0A@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
	<AANLkTim0RzT7t+u496O7WiUBhQ25hVPWnnMKUJsboz0A@mail.gmail.com>
Message-ID: <AANLkTim8QiZ0tYFx+Ux2d5xTfVJe+3HTa5MEwKuRA=RT@mail.gmail.com>

Tenta arrumar e posta pra nós  ... eheheheheh!!!


Cheers!


2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>

> é realmente trouxe os arquivos diferentes de zeros, na verdade é o
> contrario
>
>
> hehehehehe
>
> Em 16 de agosto de 2010 16:05, breno <breno em rio.pm.org> escreveu:
>
>> Acho q tá errado Gabriel, ele diz quais não tem todas as linhas
>>
>> terminando com 9 zeros, não o contrário.
>>
>> Ou entendi errado?
>>
>> 2010/8/16 Gabriel Vieira <gabriel.vieira em gmail.com>:
>> > GOOOOOOOOOOOOOOOOLFFFFFF
>> >
>> > perl -E'map{open$x,$_;say if grep!/0{9}$/,<$x>}<*-ERR>'
>> >
>> > 55
>> >
>> > 2010/8/16 Felipe Vinturini <felipe.vinturini em gmail.com>:
>> >> Ganhei! =o)
>> >> ====================================================
>> >> find . -name "*-ERR" -type f | xargs egrep 'GANHEI' | cut -d: -f1 | \
>> >> while read filen
>> >> do
>> >> fileNumRows=`wc -l "${filen}" | awk '{print $1}'`
>> >> fileNumRowsLT=`expr ${fileNumRows} - 1`
>> >> fileNumZeros=`egrep -c '000000000$' "${filen}"`
>> >> if [ ${fileNumRowsLT} -eq ${fileNumZeros} ]
>> >> then
>> >> echo "File has erros: [${filen}]."
>> >> fi
>> >> done
>> >> ====================================================
>> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>> >>>
>> >>> :-(
>> >>>
>> >>> Em 16 de agosto de 2010 14:42, Nilson Santos Figueiredo Jr.
>> >>> <acid06 em gmail.com> escreveu:
>> >>>>
>> >>>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> >>>> > André não queria utilizar nenhum modulo CPAN, fiz uma aposta com um
>> >>>> > amigo
>> >>>> > que dava pra fazer em Perl sem nenhum modulo, pois ele disse que
>> Shell
>> >>>> > Script é sussa, eu falei que Perl daria, mas com módulo. Ai ele
>> >>>> > perguntou se
>> >>>> > dava pra fazer sem módulo, como o Shell Script.
>> >>>>
>> >>>> Os módulos sugeridos são escritos em Perl. Essa aposta não faz o
>> menor
>> >>>> sentido.
>> >>>> Se você quer simplesmente ganhar a aposta, copie e cole o código do
>> >>>> módulo no seu script.
>> >>>>
>> >>>> -Nilson
>> >>>> _______________________________________________
>> >>>> Cascavel-pm mailing list
>> >>>> Cascavel-pm em pm.org
>> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>>
>> >>>
>> >>>
>> >>> --
>> >>> Atenciosamente,
>> >>>
>> >>> Roan Brasil Monteiro
>> >>> http://roanbrasil.wordpress.com/
>> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >>>
>> >>>
>> >>> _______________________________________________
>> >>> 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
>> >>
>> >
>> >
>> >
>> > --
>> > Gabriel Vieira
>> > _______________________________________________
>> > 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
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/b2f19e52/attachment.html>

From gabriel.vieira em gmail.com  Mon Aug 16 12:14:33 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Mon, 16 Aug 2010 16:14:33 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimBvKR3yQKW6Q2W=M+S=F5cr_uMnu1D-A+fUPVC@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinD5-qu=5+iwPhK+ReBdYnA3ozQ=-7iYQ2FGJ-k@mail.gmail.com>
	<AANLkTikSRbNoSUAroAOtDHQjh-W_sFK1r4AF6z-iaJpu@mail.gmail.com>
	<AANLkTimtr=furhsAoqgS03UgZ5C2wkw=D48yMs9sd2xE@mail.gmail.com>
	<AANLkTi=gM+Z_QJNkHdu+ZxR9oD8ecD5JOwA3BN9Kc_Sa@mail.gmail.com>
	<AANLkTimBvKR3yQKW6Q2W=M+S=F5cr_uMnu1D-A+fUPVC@mail.gmail.com>
Message-ID: <AANLkTimyBTYLwTXYeVrTmKMpoxaDGq0dmkwAeMpk+TkD@mail.gmail.com>

perl -E'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*-ERR>'

55 again ;)

2010/8/16 Gabriel Vieira <gabriel.vieira em gmail.com>:
> perl -E'map{open$x,$_;say if !grep!/0{9}$/,<$x>}<*-ERR>'



-- 
Gabriel Vieira

From leonardo.ruoso em gmail.com  Mon Aug 16 13:47:48 2010
From: leonardo.ruoso em gmail.com (Leonardo Ruoso)
Date: Mon, 16 Aug 2010 17:47:48 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
Message-ID: <AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>

O jeito força bruta parece ser um foreach no diretório "." para varrer os
subdiretórios de cada dia, para cada subdiretório você faz um readdir com
uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um while
no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo e
sai do loop do arquivo.

Abraços!


· · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
Leonardo Ruoso (CE1921JP)
http://lattes.cnpq.br/2719086566536387 - http://br.linkedin.com/in/lruoso
leonardo em oktiva.com.br - (85) 8787-0312 -
sip:87870312 em ekiga.net<sip%3A87870312 em ekiga.net>
Marketing, Comunicação Social e Tecnologia

http://norvig.com/21-days.html


2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>

> Seguinte,
>
> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
> pasta.
> 201008
>       |_____20100801
>       |_____20100802
>       |_____20100803
>       |_____...
>       |_____script.pl
>
> Dentro de cada pasta existem vários arquivos com nome que eu desconheço,
> mas que tem o final -ERR.
> por exemplo
>
> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR  YYYYYYYY-ERR
> e ZZZZZZZZ-ERR
>
> quero abrir todos esses arquivos com final ERR e verificar se ao final de
> CADA LINHA possui 000000000
> se possuir no final de cada linha 000000000, imprimir o nome do arquivo que
> tiver todas linhas com 000000000. Se alguma linha, no FINAL dela tiver algum
> numero onde a sequencia seja diferente de zero não imprimi.
>
> Exemplo.
>
> File XXXXXXX-ERR
> linha 1  teste blabla43 000000000
> linha 2  teste blabla32 000000000
> linha 3  teste blabla12 000000000
> ...
> linha n xxxxxxxxxxx   000000000
>
>
> File YYYYYY-ERR
> linha 1  teste blabla43 *000000200*
> linha 2  teste blabla32 000000000
> linha 3  teste blabla12 000000000
> ...
> linha n xxxxxxxxxxx   000000000
>
>
> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>
> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo XXXXXX-ERR e
> não o YYYYYY-ERR.
>
> Deu para entender?
>
>
> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>
>> Roan,
>>
>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
>> Blabos está no caminho certo. Dê uma olhada em:
>>
>> http://perldoc.perl.org/functions/readdir.html
>>
>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>> exatamente o seu problema em mãos :-)
>>
>> []s
>>
>> -b
>>
>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>> > Nâo entendi o que vc está perguntando.
>> >
>> > Seria algo relacionado a opendir e readdir?
>> >
>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> >> Olá pessoal,
>> >>
>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma
>> arvore
>> >> de diretorios baseado em data.
>> >>
>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>> >>
>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>> contador do
>> >> dia 16 até 1 ai tudo bem.
>> >>
>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no
>> final
>> >> -ERR .
>> >>
>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para
>> pegar
>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
>> >> odarquivo senão não faz nada.
>> >>
>> >> Obrigado
>> >>
>> >> --
>> >> Atenciosamente,
>> >>
>> >> Roan Brasil Monteiro
>> >> http://roanbrasil.wordpress.com/
>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >>
>> >>
>> >> _______________________________________________
>> >> Cascavel-pm mailing list
>> >> Cascavel-pm em pm.org
>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> 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/20100816/de7cff6f/attachment-0001.html>

From braun.lima em gmail.com  Mon Aug 16 14:36:50 2010
From: braun.lima em gmail.com (Marco Lima)
Date: Mon, 16 Aug 2010 18:36:50 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
Message-ID: <AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>

O que foi isso !?!?!?


Gabriel:

"... quero abrir todos esses arquivos com *final ERR* .."


perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'

segundo sua contagem seria 54! mas o que se leva em conta é o que esta sendo
executado, ou seja entre ' ', portanto 45 !!! =P

Abraços;

Marco Lima
braun.lima em gmail.com
im:mago em jabber-br.org <im%3Amago em jabber-br.org>

Register Linux User #355235
Slackware Linux, for the subgenius

"Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
um dever de quem tem."

"Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."

"Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
possa ensinar"



2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>

> O jeito força bruta parece ser um foreach no diretório "." para varrer os
> subdiretórios de cada dia, para cada subdiretório você faz um readdir com
> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um while
> no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo e
> sai do loop do arquivo.
>
> Abraços!
>
>
> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
> Leonardo Ruoso (CE1921JP)
> http://lattes.cnpq.br/2719086566536387 - http://br.linkedin.com/in/lruoso
> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net<sip%3A87870312 em ekiga.net>
> Marketing, Comunicação Social e Tecnologia
>
> http://norvig.com/21-days.html
>
>
> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> Seguinte,
>>
>> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
>> pasta.
>> 201008
>>       |_____20100801
>>       |_____20100802
>>       |_____20100803
>>       |_____...
>>       |_____script.pl
>>
>> Dentro de cada pasta existem vários arquivos com nome que eu desconheço,
>> mas que tem o final -ERR.
>> por exemplo
>>
>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR  YYYYYYYY-ERR
>> e ZZZZZZZZ-ERR
>>
>> quero abrir todos esses arquivos com final ERR e verificar se ao final de
>> CADA LINHA possui 000000000
>> se possuir no final de cada linha 000000000, imprimir o nome do arquivo
>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela tiver
>> algum numero onde a sequencia seja diferente de zero não imprimi.
>>
>> Exemplo.
>>
>> File XXXXXXX-ERR
>> linha 1  teste blabla43 000000000
>> linha 2  teste blabla32 000000000
>> linha 3  teste blabla12 000000000
>> ...
>> linha n xxxxxxxxxxx   000000000
>>
>>
>> File YYYYYY-ERR
>> linha 1  teste blabla43 *000000200*
>> linha 2  teste blabla32 000000000
>> linha 3  teste blabla12 000000000
>> ...
>> linha n xxxxxxxxxxx   000000000
>>
>>
>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>>
>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo XXXXXX-ERR e
>> não o YYYYYY-ERR.
>>
>> Deu para entender?
>>
>>
>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>>
>>> Roan,
>>>
>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
>>> Blabos está no caminho certo. Dê uma olhada em:
>>>
>>> http://perldoc.perl.org/functions/readdir.html
>>>
>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>>> exatamente o seu problema em mãos :-)
>>>
>>> []s
>>>
>>> -b
>>>
>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>>> > Nâo entendi o que vc está perguntando.
>>> >
>>> > Seria algo relacionado a opendir e readdir?
>>> >
>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>> >> Olá pessoal,
>>> >>
>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma
>>> arvore
>>> >> de diretorios baseado em data.
>>> >>
>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>>> >>
>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>>> contador do
>>> >> dia 16 até 1 ai tudo bem.
>>> >>
>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem no
>>> final
>>> >> -ERR .
>>> >>
>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para
>>> pegar
>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o nome
>>> >> odarquivo senão não faz nada.
>>> >>
>>> >> Obrigado
>>> >>
>>> >> --
>>> >> Atenciosamente,
>>> >>
>>> >> Roan Brasil Monteiro
>>> >> http://roanbrasil.wordpress.com/
>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>> >>
>>> >>
>>> >> _______________________________________________
>>> >> Cascavel-pm mailing list
>>> >> Cascavel-pm em pm.org
>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >>
>>> > _______________________________________________
>>> > Cascavel-pm mailing list
>>> > Cascavel-pm em pm.org
>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/c2d4e24f/attachment.html>

From daniel.oliveira.mantovani em gmail.com  Mon Aug 16 15:08:22 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 16 Aug 2010 19:08:22 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
Message-ID: <AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>

2010/8/16 Marco Lima <braun.lima em gmail.com>:
> O que foi isso !?!?!?
>
>
> Gabriel:
>
> "... quero abrir todos esses arquivos com final ERR .."
>
>
> perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
>
> segundo sua contagem seria 54! mas o que se leva em conta é o que esta sendo
> executado, ou seja entre ' ', portanto 45 !!! =P

Na verdade até aonde eu sei, conta tudo.

>
> Abraços;
>
> Marco Lima
> braun.lima em gmail.com
> im:mago em jabber-br.org
>
> Register Linux User #355235
> Slackware Linux, for the subgenius
>
> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
> um dever de quem tem."
>
> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
> paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
> para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>
> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> possa ensinar"
>
>
>
> 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
>>
>> O jeito força bruta parece ser um foreach no diretório "." para varrer os
>> subdiretórios de cada dia, para cada subdiretório você faz um readdir com
>> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um while
>> no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo e
>> sai do loop do arquivo.
>>
>> Abraços!
>>
>>
>> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
>> Leonardo Ruoso (CE1921JP)
>> http://lattes.cnpq.br/2719086566536387 - http://br.linkedin.com/in/lruoso
>> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net
>> Marketing, Comunicação Social e Tecnologia
>>
>> http://norvig.com/21-days.html
>>
>>
>> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>
>>> Seguinte,
>>>
>>> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
>>> pasta.
>>> 201008
>>>       |_____20100801
>>>       |_____20100802
>>>       |_____20100803
>>>       |_____...
>>>       |_____script.pl
>>>
>>> Dentro de cada pasta existem vários arquivos com nome que eu desconheço,
>>> mas que tem o final -ERR.
>>> por exemplo
>>>
>>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
>>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
>>>
>>> quero abrir todos esses arquivos com final ERR e verificar se ao final de
>>> CADA LINHA possui 000000000
>>> se possuir no final de cada linha 000000000, imprimir o nome do arquivo
>>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela tiver
>>> algum numero onde a sequencia seja diferente de zero não imprimi.
>>>
>>> Exemplo.
>>>
>>> File XXXXXXX-ERR
>>> linha 1  teste blabla43 000000000
>>> linha 2  teste blabla32 000000000
>>> linha 3  teste blabla12 000000000
>>> ...
>>> linha n xxxxxxxxxxx   000000000
>>>
>>>
>>> File YYYYYY-ERR
>>> linha 1  teste blabla43 000000200
>>> linha 2  teste blabla32 000000000
>>> linha 3  teste blabla12 000000000
>>> ...
>>> linha n xxxxxxxxxxx   000000000
>>>
>>>
>>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>>>
>>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo XXXXXX-ERR e
>>> não o YYYYYY-ERR.
>>>
>>> Deu para entender?
>>>
>>>
>>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>>>>
>>>> Roan,
>>>>
>>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
>>>> Blabos está no caminho certo. Dê uma olhada em:
>>>>
>>>> http://perldoc.perl.org/functions/readdir.html
>>>>
>>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>>>> exatamente o seu problema em mãos :-)
>>>>
>>>> []s
>>>>
>>>> -b
>>>>
>>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>>>> > Nâo entendi o que vc está perguntando.
>>>> >
>>>> > Seria algo relacionado a opendir e readdir?
>>>> >
>>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>>> >> Olá pessoal,
>>>> >>
>>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho uma
>>>> >> arvore
>>>> >> de diretorios baseado em data.
>>>> >>
>>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>>>> >>
>>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>>>> >> contador do
>>>> >> dia 16 até 1 ai tudo bem.
>>>> >>
>>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem
>>>> >> no final
>>>> >> -ERR .
>>>> >>
>>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz para
>>>> >> pegar
>>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o
>>>> >> nome
>>>> >> odarquivo senão não faz nada.
>>>> >>
>>>> >> Obrigado
>>>> >>
>>>> >> --
>>>> >> Atenciosamente,
>>>> >>
>>>> >> Roan Brasil Monteiro
>>>> >> http://roanbrasil.wordpress.com/
>>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>> >>
>>>> >>
>>>> >> _______________________________________________
>>>> >> Cascavel-pm mailing list
>>>> >> Cascavel-pm em pm.org
>>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>> >>
>>>> > _______________________________________________
>>>> > Cascavel-pm mailing list
>>>> > Cascavel-pm em pm.org
>>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>> >
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>>
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> http://roanbrasil.wordpress.com/
>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From braun.lima em gmail.com  Mon Aug 16 15:15:34 2010
From: braun.lima em gmail.com (Marco Lima)
Date: Mon, 16 Aug 2010 19:15:34 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
Message-ID: <AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>

O que esta fora do '' não é código, portanto não conta!

Marco Lima
braun.lima em gmail.com
im:mago em jabber-br.org <im%3Amago em jabber-br.org>

Register Linux User #355235
Slackware Linux, for the subgenius

"Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
um dever de quem tem."

"Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."

"Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
possa ensinar"



Em 16 de agosto de 2010 19:08, Daniel de Oliveira Mantovani <
daniel.oliveira.mantovani em gmail.com> escreveu:

> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
> > O que foi isso !?!?!?
> >
> >
> > Gabriel:
> >
> > "... quero abrir todos esses arquivos com final ERR .."
> >
> >
> > perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
> >
> > segundo sua contagem seria 54! mas o que se leva em conta é o que esta
> sendo
> > executado, ou seja entre ' ', portanto 45 !!! =P
>
> Na verdade até aonde eu sei, conta tudo.
>
> >
> > Abraços;
> >
> > Marco Lima
> > braun.lima em gmail.com
> > im:mago em jabber-br.org <im%3Amago em jabber-br.org>
> >
> > Register Linux User #355235
> > Slackware Linux, for the subgenius
> >
> > "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento
> é
> > um dever de quem tem."
> >
> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
> Esta
> > paixão é, na realidade, uma atividade significativa, inspiradora e
> prazerosa
> > para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
> >
> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> > possa ensinar"
> >
> >
> >
> > 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
> >>
> >> O jeito força bruta parece ser um foreach no diretório "." para varrer
> os
> >> subdiretórios de cada dia, para cada subdiretório você faz um readdir
> com
> >> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um
> while
> >> no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo
> e
> >> sai do loop do arquivo.
> >>
> >> Abraços!
> >>
> >>
> >> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
> >> Leonardo Ruoso (CE1921JP)
> >> http://lattes.cnpq.br/2719086566536387 -
> http://br.linkedin.com/in/lruoso
> >> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net<sip%3A87870312 em ekiga.net>
> >> Marketing, Comunicação Social e Tecnologia
> >>
> >> http://norvig.com/21-days.html
> >>
> >>
> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
> >>>
> >>> Seguinte,
> >>>
> >>> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
> >>> pasta.
> >>> 201008
> >>>       |_____20100801
> >>>       |_____20100802
> >>>       |_____20100803
> >>>       |_____...
> >>>       |_____script.pl
> >>>
> >>> Dentro de cada pasta existem vários arquivos com nome que eu
> desconheço,
> >>> mas que tem o final -ERR.
> >>> por exemplo
> >>>
> >>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
> >>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
> >>>
> >>> quero abrir todos esses arquivos com final ERR e verificar se ao final
> de
> >>> CADA LINHA possui 000000000
> >>> se possuir no final de cada linha 000000000, imprimir o nome do arquivo
> >>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela
> tiver
> >>> algum numero onde a sequencia seja diferente de zero não imprimi.
> >>>
> >>> Exemplo.
> >>>
> >>> File XXXXXXX-ERR
> >>> linha 1  teste blabla43 000000000
> >>> linha 2  teste blabla32 000000000
> >>> linha 3  teste blabla12 000000000
> >>> ...
> >>> linha n xxxxxxxxxxx   000000000
> >>>
> >>>
> >>> File YYYYYY-ERR
> >>> linha 1  teste blabla43 000000200
> >>> linha 2  teste blabla32 000000000
> >>> linha 3  teste blabla12 000000000
> >>> ...
> >>> linha n xxxxxxxxxxx   000000000
> >>>
> >>>
> >>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
> >>>
> >>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo XXXXXX-ERR
> e
> >>> não o YYYYYY-ERR.
> >>>
> >>> Deu para entender?
> >>>
> >>>
> >>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
> >>>>
> >>>> Roan,
> >>>>
> >>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que o
> >>>> Blabos está no caminho certo. Dê uma olhada em:
> >>>>
> >>>> http://perldoc.perl.org/functions/readdir.html
> >>>>
> >>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
> >>>> exatamente o seu problema em mãos :-)
> >>>>
> >>>> []s
> >>>>
> >>>> -b
> >>>>
> >>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
> >>>> > Nâo entendi o que vc está perguntando.
> >>>> >
> >>>> > Seria algo relacionado a opendir e readdir?
> >>>> >
> >>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >>>> >> Olá pessoal,
> >>>> >>
> >>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho
> uma
> >>>> >> arvore
> >>>> >> de diretorios baseado em data.
> >>>> >>
> >>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
> >>>> >>
> >>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
> >>>> >> contador do
> >>>> >> dia 16 até 1 ai tudo bem.
> >>>> >>
> >>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que tem
> >>>> >> no final
> >>>> >> -ERR .
> >>>> >>
> >>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz
> para
> >>>> >> pegar
> >>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o
> >>>> >> nome
> >>>> >> odarquivo senão não faz nada.
> >>>> >>
> >>>> >> Obrigado
> >>>> >>
> >>>> >> --
> >>>> >> Atenciosamente,
> >>>> >>
> >>>> >> Roan Brasil Monteiro
> >>>> >> http://roanbrasil.wordpress.com/
> >>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>>> >>
> >>>> >>
> >>>> >> _______________________________________________
> >>>> >> Cascavel-pm mailing list
> >>>> >> Cascavel-pm em pm.org
> >>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>>> >>
> >>>> > _______________________________________________
> >>>> > Cascavel-pm mailing list
> >>>> > Cascavel-pm em pm.org
> >>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>>> >
> >>>> _______________________________________________
> >>>> Cascavel-pm mailing list
> >>>> Cascavel-pm em pm.org
> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>>
> >>>
> >>>
> >>> --
> >>> Atenciosamente,
> >>>
> >>> Roan Brasil Monteiro
> >>> http://roanbrasil.wordpress.com/
> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >>>
> >>>
> >>> _______________________________________________
> >>> Cascavel-pm mailing list
> >>> Cascavel-pm em pm.org
> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>
> >>
> >> _______________________________________________
> >> Cascavel-pm mailing list
> >> Cascavel-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> http://www.danielmantovani.com
>
> "If you?ve never written anything thoughtful, then you?ve never had
> any difficult, important, or interesting thoughts. That?s the secret:
> people who don?t write, are people who don?t think."
> _______________________________________________
> 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/20100816/41523eb6/attachment-0001.html>

From daniel.oliveira.mantovani em gmail.com  Mon Aug 16 15:20:44 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 16 Aug 2010 19:20:44 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
Message-ID: <AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>

2010/8/16 Marco Lima <braun.lima em gmail.com>:
> O que esta fora do '' não é código, portanto não conta!

Os parâmetros influenciam no código, por tanto contam sim!


>
> Marco Lima
> braun.lima em gmail.com
> im:mago em jabber-br.org
>
> Register Linux User #355235
> Slackware Linux, for the subgenius
>
> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
> um dever de quem tem."
>
> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
> paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
> para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>
> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> possa ensinar"
>
>
>
> Em 16 de agosto de 2010 19:08, Daniel de Oliveira Mantovani
> <daniel.oliveira.mantovani em gmail.com> escreveu:
>>
>> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
>> > O que foi isso !?!?!?
>> >
>> >
>> > Gabriel:
>> >
>> > "... quero abrir todos esses arquivos com final ERR .."
>> >
>> >
>> > perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
>> >
>> > segundo sua contagem seria 54! mas o que se leva em conta é o que esta
>> > sendo
>> > executado, ou seja entre ' ', portanto 45 !!! =P
>>
>> Na verdade até aonde eu sei, conta tudo.
>>
>> >
>> > Abraços;
>> >
>> > Marco Lima
>> > braun.lima em gmail.com
>> > im:mago em jabber-br.org
>> >
>> > Register Linux User #355235
>> > Slackware Linux, for the subgenius
>> >
>> > "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento
>> > é
>> > um dever de quem tem."
>> >
>> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
>> > Esta
>> > paixão é, na realidade, uma atividade significativa, inspiradora e
>> > prazerosa
>> > para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>> >
>> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
>> > possa ensinar"
>> >
>> >
>> >
>> > 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
>> >>
>> >> O jeito força bruta parece ser um foreach no diretório "." para varrer
>> >> os
>> >> subdiretórios de cada dia, para cada subdiretório você faz um readdir
>> >> com
>> >> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um
>> >> while
>> >> no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo
>> >> e
>> >> sai do loop do arquivo.
>> >>
>> >> Abraços!
>> >>
>> >>
>> >> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
>> >> Leonardo Ruoso (CE1921JP)
>> >> http://lattes.cnpq.br/2719086566536387 -
>> >> http://br.linkedin.com/in/lruoso
>> >> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net
>> >> Marketing, Comunicação Social e Tecnologia
>> >>
>> >> http://norvig.com/21-days.html
>> >>
>> >>
>> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>> >>>
>> >>> Seguinte,
>> >>>
>> >>> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
>> >>> pasta.
>> >>> 201008
>> >>>       |_____20100801
>> >>>       |_____20100802
>> >>>       |_____20100803
>> >>>       |_____...
>> >>>       |_____script.pl
>> >>>
>> >>> Dentro de cada pasta existem vários arquivos com nome que eu
>> >>> desconheço,
>> >>> mas que tem o final -ERR.
>> >>> por exemplo
>> >>>
>> >>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
>> >>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
>> >>>
>> >>> quero abrir todos esses arquivos com final ERR e verificar se ao final
>> >>> de
>> >>> CADA LINHA possui 000000000
>> >>> se possuir no final de cada linha 000000000, imprimir o nome do
>> >>> arquivo
>> >>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela
>> >>> tiver
>> >>> algum numero onde a sequencia seja diferente de zero não imprimi.
>> >>>
>> >>> Exemplo.
>> >>>
>> >>> File XXXXXXX-ERR
>> >>> linha 1  teste blabla43 000000000
>> >>> linha 2  teste blabla32 000000000
>> >>> linha 3  teste blabla12 000000000
>> >>> ...
>> >>> linha n xxxxxxxxxxx   000000000
>> >>>
>> >>>
>> >>> File YYYYYY-ERR
>> >>> linha 1  teste blabla43 000000200
>> >>> linha 2  teste blabla32 000000000
>> >>> linha 3  teste blabla12 000000000
>> >>> ...
>> >>> linha n xxxxxxxxxxx   000000000
>> >>>
>> >>>
>> >>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>> >>>
>> >>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo
>> >>> XXXXXX-ERR e
>> >>> não o YYYYYY-ERR.
>> >>>
>> >>> Deu para entender?
>> >>>
>> >>>
>> >>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>> >>>>
>> >>>> Roan,
>> >>>>
>> >>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que
>> >>>> o
>> >>>> Blabos está no caminho certo. Dê uma olhada em:
>> >>>>
>> >>>> http://perldoc.perl.org/functions/readdir.html
>> >>>>
>> >>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>> >>>> exatamente o seu problema em mãos :-)
>> >>>>
>> >>>> []s
>> >>>>
>> >>>> -b
>> >>>>
>> >>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>> >>>> > Nâo entendi o que vc está perguntando.
>> >>>> >
>> >>>> > Seria algo relacionado a opendir e readdir?
>> >>>> >
>> >>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> >>>> >> Olá pessoal,
>> >>>> >>
>> >>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho
>> >>>> >> uma
>> >>>> >> arvore
>> >>>> >> de diretorios baseado em data.
>> >>>> >>
>> >>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>> >>>> >>
>> >>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>> >>>> >> contador do
>> >>>> >> dia 16 até 1 ai tudo bem.
>> >>>> >>
>> >>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que
>> >>>> >> tem
>> >>>> >> no final
>> >>>> >> -ERR .
>> >>>> >>
>> >>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz
>> >>>> >> para
>> >>>> >> pegar
>> >>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o
>> >>>> >> nome
>> >>>> >> odarquivo senão não faz nada.
>> >>>> >>
>> >>>> >> Obrigado
>> >>>> >>
>> >>>> >> --
>> >>>> >> Atenciosamente,
>> >>>> >>
>> >>>> >> Roan Brasil Monteiro
>> >>>> >> http://roanbrasil.wordpress.com/
>> >>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >>>> >>
>> >>>> >>
>> >>>> >> _______________________________________________
>> >>>> >> Cascavel-pm mailing list
>> >>>> >> Cascavel-pm em pm.org
>> >>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>>> >>
>> >>>> > _______________________________________________
>> >>>> > Cascavel-pm mailing list
>> >>>> > Cascavel-pm em pm.org
>> >>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>>> >
>> >>>> _______________________________________________
>> >>>> Cascavel-pm mailing list
>> >>>> Cascavel-pm em pm.org
>> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>>
>> >>>
>> >>>
>> >>> --
>> >>> Atenciosamente,
>> >>>
>> >>> Roan Brasil Monteiro
>> >>> http://roanbrasil.wordpress.com/
>> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >>>
>> >>>
>> >>> _______________________________________________
>> >>> Cascavel-pm mailing list
>> >>> Cascavel-pm em pm.org
>> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>
>> >>
>> >> _______________________________________________
>> >> Cascavel-pm mailing list
>> >> Cascavel-pm em pm.org
>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> http://www.danielmantovani.com
>>
>> "If you?ve never written anything thoughtful, then you?ve never had
>> any difficult, important, or interesting thoughts. That?s the secret:
>> people who don?t write, are people who don?t think."
>> _______________________________________________
>> 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
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From breno em rio.pm.org  Mon Aug 16 15:36:46 2010
From: breno em rio.pm.org (breno)
Date: Mon, 16 Aug 2010 19:36:46 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
Message-ID: <AANLkTinCdAHYTFw+_0pVStDvxDA2-Z9w8mH7uLK-Rv4Q@mail.gmail.com>

Two camels in a tiny car!!


2010/8/16 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>:
> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
>> O que esta fora do '' não é código, portanto não conta!
>
> Os parâmetros influenciam no código, por tanto contam sim!
>
>
>>
>> Marco Lima
>> braun.lima em gmail.com
>> im:mago em jabber-br.org
>>
>> Register Linux User #355235
>> Slackware Linux, for the subgenius
>>
>> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
>> um dever de quem tem."
>>
>> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
>> paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
>> para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>>
>> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
>> possa ensinar"
>>
>>
>>
>> Em 16 de agosto de 2010 19:08, Daniel de Oliveira Mantovani
>> <daniel.oliveira.mantovani em gmail.com> escreveu:
>>>
>>> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
>>> > O que foi isso !?!?!?
>>> >
>>> >
>>> > Gabriel:
>>> >
>>> > "... quero abrir todos esses arquivos com final ERR .."
>>> >
>>> >
>>> > perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
>>> >
>>> > segundo sua contagem seria 54! mas o que se leva em conta é o que esta
>>> > sendo
>>> > executado, ou seja entre ' ', portanto 45 !!! =P
>>>
>>> Na verdade até aonde eu sei, conta tudo.
>>>
>>> >
>>> > Abraços;
>>> >
>>> > Marco Lima
>>> > braun.lima em gmail.com
>>> > im:mago em jabber-br.org
>>> >
>>> > Register Linux User #355235
>>> > Slackware Linux, for the subgenius
>>> >
>>> > "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento
>>> > é
>>> > um dever de quem tem."
>>> >
>>> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
>>> > Esta
>>> > paixão é, na realidade, uma atividade significativa, inspiradora e
>>> > prazerosa
>>> > para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>>> >
>>> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
>>> > possa ensinar"
>>> >
>>> >
>>> >
>>> > 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
>>> >>
>>> >> O jeito força bruta parece ser um foreach no diretório "." para varrer
>>> >> os
>>> >> subdiretórios de cada dia, para cada subdiretório você faz um readdir
>>> >> com
>>> >> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz um
>>> >> while
>>> >> no arquivo, até encontrar uma linha com erro, imprime o nome do arquivo
>>> >> e
>>> >> sai do loop do arquivo.
>>> >>
>>> >> Abraços!
>>> >>
>>> >>
>>> >> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
>>> >> Leonardo Ruoso (CE1921JP)
>>> >> http://lattes.cnpq.br/2719086566536387 -
>>> >> http://br.linkedin.com/in/lruoso
>>> >> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net
>>> >> Marketing, Comunicação Social e Tecnologia
>>> >>
>>> >> http://norvig.com/21-days.html
>>> >>
>>> >>
>>> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>> >>>
>>> >>> Seguinte,
>>> >>>
>>> >>> Imagina que tenho a pasta chamada 201008 e meu script perl está nessa
>>> >>> pasta.
>>> >>> 201008
>>> >>>       |_____20100801
>>> >>>       |_____20100802
>>> >>>       |_____20100803
>>> >>>       |_____...
>>> >>>       |_____script.pl
>>> >>>
>>> >>> Dentro de cada pasta existem vários arquivos com nome que eu
>>> >>> desconheço,
>>> >>> mas que tem o final -ERR.
>>> >>> por exemplo
>>> >>>
>>> >>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
>>> >>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
>>> >>>
>>> >>> quero abrir todos esses arquivos com final ERR e verificar se ao final
>>> >>> de
>>> >>> CADA LINHA possui 000000000
>>> >>> se possuir no final de cada linha 000000000, imprimir o nome do
>>> >>> arquivo
>>> >>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela
>>> >>> tiver
>>> >>> algum numero onde a sequencia seja diferente de zero não imprimi.
>>> >>>
>>> >>> Exemplo.
>>> >>>
>>> >>> File XXXXXXX-ERR
>>> >>> linha 1  teste blabla43 000000000
>>> >>> linha 2  teste blabla32 000000000
>>> >>> linha 3  teste blabla12 000000000
>>> >>> ...
>>> >>> linha n xxxxxxxxxxx   000000000
>>> >>>
>>> >>>
>>> >>> File YYYYYY-ERR
>>> >>> linha 1  teste blabla43 000000200
>>> >>> linha 2  teste blabla32 000000000
>>> >>> linha 3  teste blabla12 000000000
>>> >>> ...
>>> >>> linha n xxxxxxxxxxx   000000000
>>> >>>
>>> >>>
>>> >>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>>> >>>
>>> >>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo
>>> >>> XXXXXX-ERR e
>>> >>> não o YYYYYY-ERR.
>>> >>>
>>> >>> Deu para entender?
>>> >>>
>>> >>>
>>> >>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>>> >>>>
>>> >>>> Roan,
>>> >>>>
>>> >>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho que
>>> >>>> o
>>> >>>> Blabos está no caminho certo. Dê uma olhada em:
>>> >>>>
>>> >>>> http://perldoc.perl.org/functions/readdir.html
>>> >>>>
>>> >>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>>> >>>> exatamente o seu problema em mãos :-)
>>> >>>>
>>> >>>> []s
>>> >>>>
>>> >>>> -b
>>> >>>>
>>> >>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>>> >>>> > Nâo entendi o que vc está perguntando.
>>> >>>> >
>>> >>>> > Seria algo relacionado a opendir e readdir?
>>> >>>> >
>>> >>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>>> >>>> >> Olá pessoal,
>>> >>>> >>
>>> >>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu tenho
>>> >>>> >> uma
>>> >>>> >> arvore
>>> >>>> >> de diretorios baseado em data.
>>> >>>> >>
>>> >>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>>> >>>> >>
>>> >>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>>> >>>> >> contador do
>>> >>>> >> dia 16 até 1 ai tudo bem.
>>> >>>> >>
>>> >>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que
>>> >>>> >> tem
>>> >>>> >> no final
>>> >>>> >> -ERR .
>>> >>>> >>
>>> >>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz
>>> >>>> >> para
>>> >>>> >> pegar
>>> >>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi o
>>> >>>> >> nome
>>> >>>> >> odarquivo senão não faz nada.
>>> >>>> >>
>>> >>>> >> Obrigado
>>> >>>> >>
>>> >>>> >> --
>>> >>>> >> Atenciosamente,
>>> >>>> >>
>>> >>>> >> Roan Brasil Monteiro
>>> >>>> >> http://roanbrasil.wordpress.com/
>>> >>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>> >>>> >>
>>> >>>> >>
>>> >>>> >> _______________________________________________
>>> >>>> >> Cascavel-pm mailing list
>>> >>>> >> Cascavel-pm em pm.org
>>> >>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >>>> >>
>>> >>>> > _______________________________________________
>>> >>>> > Cascavel-pm mailing list
>>> >>>> > Cascavel-pm em pm.org
>>> >>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >>>> >
>>> >>>> _______________________________________________
>>> >>>> Cascavel-pm mailing list
>>> >>>> Cascavel-pm em pm.org
>>> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >>>
>>> >>>
>>> >>>
>>> >>> --
>>> >>> Atenciosamente,
>>> >>>
>>> >>> Roan Brasil Monteiro
>>> >>> http://roanbrasil.wordpress.com/
>>> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>> >>>
>>> >>>
>>> >>> _______________________________________________
>>> >>> Cascavel-pm mailing list
>>> >>> Cascavel-pm em pm.org
>>> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >>
>>> >>
>>> >> _______________________________________________
>>> >> Cascavel-pm mailing list
>>> >> Cascavel-pm em pm.org
>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >
>>> >
>>> > _______________________________________________
>>> > Cascavel-pm mailing list
>>> > Cascavel-pm em pm.org
>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>>> >
>>>
>>>
>>>
>>> --
>>> http://www.danielmantovani.com
>>>
>>> "If you?ve never written anything thoughtful, then you?ve never had
>>> any difficult, important, or interesting thoughts. That?s the secret:
>>> people who don?t write, are people who don?t think."
>>> _______________________________________________
>>> 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
>>
>
>
>
> --
> http://www.danielmantovani.com
>
> "If you?ve never written anything thoughtful, then you?ve never had
> any difficult, important, or interesting thoughts. That?s the secret:
> people who don?t write, are people who don?t think."
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From braun.lima em gmail.com  Mon Aug 16 15:37:43 2010
From: braun.lima em gmail.com (Marco Lima)
Date: Mon, 16 Aug 2010 19:37:43 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
Message-ID: <AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>

Bom, acho que vc esta enganado, pois o mesmo tem haver com o shell e não com
o código, se por exemplo eu colocar o código em um arquivo ele ficaria
apenas:

map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>

Marco Lima
braun.lima em gmail.com
im:mago em jabber-br.org <im%3Amago em jabber-br.org>

Register Linux User #355235
Slackware Linux, for the subgenius

"Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
um dever de quem tem."

"Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."

"Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
possa ensinar"



Em 16 de agosto de 2010 19:20, Daniel de Oliveira Mantovani <
daniel.oliveira.mantovani em gmail.com> escreveu:

> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
> > O que esta fora do '' não é código, portanto não conta!
>
> Os parâmetros influenciam no código, por tanto contam sim!
>
>
> >
> > Marco Lima
> > braun.lima em gmail.com
> > im:mago em jabber-br.org <im%3Amago em jabber-br.org>
> >
> > Register Linux User #355235
> > Slackware Linux, for the subgenius
> >
> > "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento
> é
> > um dever de quem tem."
> >
> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
> Esta
> > paixão é, na realidade, uma atividade significativa, inspiradora e
> prazerosa
> > para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
> >
> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> > possa ensinar"
> >
> >
> >
> > Em 16 de agosto de 2010 19:08, Daniel de Oliveira Mantovani
> > <daniel.oliveira.mantovani em gmail.com> escreveu:
> >>
> >> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
> >> > O que foi isso !?!?!?
> >> >
> >> >
> >> > Gabriel:
> >> >
> >> > "... quero abrir todos esses arquivos com final ERR .."
> >> >
> >> >
> >> > perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
> >> >
> >> > segundo sua contagem seria 54! mas o que se leva em conta é o que esta
> >> > sendo
> >> > executado, ou seja entre ' ', portanto 45 !!! =P
> >>
> >> Na verdade até aonde eu sei, conta tudo.
> >>
> >> >
> >> > Abraços;
> >> >
> >> > Marco Lima
> >> > braun.lima em gmail.com
> >> > im:mago em jabber-br.org <im%3Amago em jabber-br.org>
> >> >
> >> > Register Linux User #355235
> >> > Slackware Linux, for the subgenius
> >> >
> >> > "Ter acesso ao conhecimento é um dever de todos; transmitir
> conhecimento
> >> > é
> >> > um dever de quem tem."
> >> >
> >> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma
> paixão.
> >> > Esta
> >> > paixão é, na realidade, uma atividade significativa, inspiradora e
> >> > prazerosa
> >> > para o indivíduo, seja ela rotulada como "trabalho" ou como
> "diversão."
> >> >
> >> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que
> não
> >> > possa ensinar"
> >> >
> >> >
> >> >
> >> > 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
> >> >>
> >> >> O jeito força bruta parece ser um foreach no diretório "." para
> varrer
> >> >> os
> >> >> subdiretórios de cada dia, para cada subdiretório você faz um readdir
> >> >> com
> >> >> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz
> um
> >> >> while
> >> >> no arquivo, até encontrar uma linha com erro, imprime o nome do
> arquivo
> >> >> e
> >> >> sai do loop do arquivo.
> >> >>
> >> >> Abraços!
> >> >>
> >> >>
> >> >> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
> >> >> Leonardo Ruoso (CE1921JP)
> >> >> http://lattes.cnpq.br/2719086566536387 -
> >> >> http://br.linkedin.com/in/lruoso
> >> >> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net<sip%3A87870312 em ekiga.net>
> >> >> Marketing, Comunicação Social e Tecnologia
> >> >>
> >> >> http://norvig.com/21-days.html
> >> >>
> >> >>
> >> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
> >> >>>
> >> >>> Seguinte,
> >> >>>
> >> >>> Imagina que tenho a pasta chamada 201008 e meu script perl está
> nessa
> >> >>> pasta.
> >> >>> 201008
> >> >>>       |_____20100801
> >> >>>       |_____20100802
> >> >>>       |_____20100803
> >> >>>       |_____...
> >> >>>       |_____script.pl
> >> >>>
> >> >>> Dentro de cada pasta existem vários arquivos com nome que eu
> >> >>> desconheço,
> >> >>> mas que tem o final -ERR.
> >> >>> por exemplo
> >> >>>
> >> >>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
> >> >>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
> >> >>>
> >> >>> quero abrir todos esses arquivos com final ERR e verificar se ao
> final
> >> >>> de
> >> >>> CADA LINHA possui 000000000
> >> >>> se possuir no final de cada linha 000000000, imprimir o nome do
> >> >>> arquivo
> >> >>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL dela
> >> >>> tiver
> >> >>> algum numero onde a sequencia seja diferente de zero não imprimi.
> >> >>>
> >> >>> Exemplo.
> >> >>>
> >> >>> File XXXXXXX-ERR
> >> >>> linha 1  teste blabla43 000000000
> >> >>> linha 2  teste blabla32 000000000
> >> >>> linha 3  teste blabla12 000000000
> >> >>> ...
> >> >>> linha n xxxxxxxxxxx   000000000
> >> >>>
> >> >>>
> >> >>> File YYYYYY-ERR
> >> >>> linha 1  teste blabla43 000000200
> >> >>> linha 2  teste blabla32 000000000
> >> >>> linha 3  teste blabla12 000000000
> >> >>> ...
> >> >>> linha n xxxxxxxxxxx   000000000
> >> >>>
> >> >>>
> >> >>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
> >> >>>
> >> >>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo
> >> >>> XXXXXX-ERR e
> >> >>> não o YYYYYY-ERR.
> >> >>>
> >> >>> Deu para entender?
> >> >>>
> >> >>>
> >> >>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
> >> >>>>
> >> >>>> Roan,
> >> >>>>
> >> >>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho
> que
> >> >>>> o
> >> >>>> Blabos está no caminho certo. Dê uma olhada em:
> >> >>>>
> >> >>>> http://perldoc.perl.org/functions/readdir.html
> >> >>>>
> >> >>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
> >> >>>> exatamente o seu problema em mãos :-)
> >> >>>>
> >> >>>> []s
> >> >>>>
> >> >>>> -b
> >> >>>>
> >> >>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
> >> >>>> > Nâo entendi o que vc está perguntando.
> >> >>>> >
> >> >>>> > Seria algo relacionado a opendir e readdir?
> >> >>>> >
> >> >>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> >> >>>> >> Olá pessoal,
> >> >>>> >>
> >> >>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu
> tenho
> >> >>>> >> uma
> >> >>>> >> arvore
> >> >>>> >> de diretorios baseado em data.
> >> >>>> >>
> >> >>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
> >> >>>> >>
> >> >>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
> >> >>>> >> contador do
> >> >>>> >> dia 16 até 1 ai tudo bem.
> >> >>>> >>
> >> >>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que
> >> >>>> >> tem
> >> >>>> >> no final
> >> >>>> >> -ERR .
> >> >>>> >>
> >> >>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja fiz
> >> >>>> >> para
> >> >>>> >> pegar
> >> >>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi
> o
> >> >>>> >> nome
> >> >>>> >> odarquivo senão não faz nada.
> >> >>>> >>
> >> >>>> >> Obrigado
> >> >>>> >>
> >> >>>> >> --
> >> >>>> >> Atenciosamente,
> >> >>>> >>
> >> >>>> >> Roan Brasil Monteiro
> >> >>>> >> http://roanbrasil.wordpress.com/
> >> >>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >> >>>> >>
> >> >>>> >>
> >> >>>> >> _______________________________________________
> >> >>>> >> Cascavel-pm mailing list
> >> >>>> >> Cascavel-pm em pm.org
> >> >>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >>>> >>
> >> >>>> > _______________________________________________
> >> >>>> > Cascavel-pm mailing list
> >> >>>> > Cascavel-pm em pm.org
> >> >>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >>>> >
> >> >>>> _______________________________________________
> >> >>>> Cascavel-pm mailing list
> >> >>>> Cascavel-pm em pm.org
> >> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >>>
> >> >>>
> >> >>>
> >> >>> --
> >> >>> Atenciosamente,
> >> >>>
> >> >>> Roan Brasil Monteiro
> >> >>> http://roanbrasil.wordpress.com/
> >> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> >> >>>
> >> >>>
> >> >>> _______________________________________________
> >> >>> Cascavel-pm mailing list
> >> >>> Cascavel-pm em pm.org
> >> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >>
> >> >>
> >> >> _______________________________________________
> >> >> Cascavel-pm mailing list
> >> >> Cascavel-pm em pm.org
> >> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >
> >> >
> >> > _______________________________________________
> >> > Cascavel-pm mailing list
> >> > Cascavel-pm em pm.org
> >> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >> >
> >>
> >>
> >>
> >> --
> >> http://www.danielmantovani.com
> >>
> >> "If you?ve never written anything thoughtful, then you?ve never had
> >> any difficult, important, or interesting thoughts. That?s the secret:
> >> people who don?t write, are people who don?t think."
> >> _______________________________________________
> >> 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
> >
>
>
>
> --
> http://www.danielmantovani.com
>
> "If you?ve never written anything thoughtful, then you?ve never had
> any difficult, important, or interesting thoughts. That?s the secret:
> people who don?t write, are people who don?t think."
> _______________________________________________
> 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/20100816/15b222ce/attachment-0001.html>

From gabriel.vieira em gmail.com  Mon Aug 16 15:43:02 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Mon, 16 Aug 2010 19:43:02 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
	<AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
Message-ID: <AANLkTimG9BkMTeYfiUF8bs-SQnS=LU9hf0drbTqTpOVM@mail.gmail.com>

2010/8/16 Marco Lima <braun.lima em gmail.com>:
> Bom, acho que vc esta enganado, pois o mesmo tem haver com o shell e não com
> o código, se por exemplo eu colocar o código em um arquivo ele ficaria
> apenas:
>
> map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>


Bom, nesse caso, como se utiliza features do Perl 5.10, então teria
"use feature;" a mais.

Mas enfim, vamos diminuir o código!

-- 
Gabriel Vieira

From daniel.oliveira.mantovani em gmail.com  Mon Aug 16 15:46:56 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 16 Aug 2010 19:46:56 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
	<AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
Message-ID: <AANLkTi=DoEf72u+M1OmCzC03xUUT+P-2KRM5dVd9x2C=@mail.gmail.com>

2010/8/16 Marco Lima <braun.lima em gmail.com>:
> Bom, acho que vc esta enganado, pois o mesmo tem haver com o shell e não com
> o código, se por exemplo eu colocar o código em um arquivo ele ficaria
> apenas:
>
> map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>

err....
(Do you need to predeclare say?)

No caso do one-liner na shell você "omitiu" o shebang usando parâmetros.
No caso do código acima você teria que fazer,

#perl -E
map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>

Que conta o "#perl -E", por tanto os parâmetros contam.

>
> Marco Lima
> braun.lima em gmail.com
> im:mago em jabber-br.org
>
> Register Linux User #355235
> Slackware Linux, for the subgenius
>
> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
> um dever de quem tem."
>
> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
> paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
> para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>
> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> possa ensinar"
>
>
>
> Em 16 de agosto de 2010 19:20, Daniel de Oliveira Mantovani
> <daniel.oliveira.mantovani em gmail.com> escreveu:
>>
>> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
>> > O que esta fora do '' não é código, portanto não conta!
>>
>> Os parâmetros influenciam no código, por tanto contam sim!
>>
>>
>> >
>> > Marco Lima
>> > braun.lima em gmail.com
>> > im:mago em jabber-br.org
>> >
>> > Register Linux User #355235
>> > Slackware Linux, for the subgenius
>> >
>> > "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento
>> > é
>> > um dever de quem tem."
>> >
>> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
>> > Esta
>> > paixão é, na realidade, uma atividade significativa, inspiradora e
>> > prazerosa
>> > para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
>> >
>> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
>> > possa ensinar"
>> >
>> >
>> >
>> > Em 16 de agosto de 2010 19:08, Daniel de Oliveira Mantovani
>> > <daniel.oliveira.mantovani em gmail.com> escreveu:
>> >>
>> >> 2010/8/16 Marco Lima <braun.lima em gmail.com>:
>> >> > O que foi isso !?!?!?
>> >> >
>> >> >
>> >> > Gabriel:
>> >> >
>> >> > "... quero abrir todos esses arquivos com final ERR .."
>> >> >
>> >> >
>> >> > perl -E 'map{open$x,$_;say if!grep!/0{9}$/,<$x>}<*ERR>'
>> >> >
>> >> > segundo sua contagem seria 54! mas o que se leva em conta é o que
>> >> > esta
>> >> > sendo
>> >> > executado, ou seja entre ' ', portanto 45 !!! =P
>> >>
>> >> Na verdade até aonde eu sei, conta tudo.
>> >>
>> >> >
>> >> > Abraços;
>> >> >
>> >> > Marco Lima
>> >> > braun.lima em gmail.com
>> >> > im:mago em jabber-br.org
>> >> >
>> >> > Register Linux User #355235
>> >> > Slackware Linux, for the subgenius
>> >> >
>> >> > "Ter acesso ao conhecimento é um dever de todos; transmitir
>> >> > conhecimento
>> >> > é
>> >> > um dever de quem tem."
>> >> >
>> >> > "Na visão do hacker, o sentido da vida está em dedicar-se a uma
>> >> > paixão.
>> >> > Esta
>> >> > paixão é, na realidade, uma atividade significativa, inspiradora e
>> >> > prazerosa
>> >> > para o indivíduo, seja ela rotulada como "trabalho" ou como
>> >> > "diversão."
>> >> >
>> >> > "Ninguém é tão grande que não possa aprender, e nem tão pequeno que
>> >> > não
>> >> > possa ensinar"
>> >> >
>> >> >
>> >> >
>> >> > 2010/8/16 Leonardo Ruoso <leonardo.ruoso em gmail.com>
>> >> >>
>> >> >> O jeito força bruta parece ser um foreach no diretório "." para
>> >> >> varrer
>> >> >> os
>> >> >> subdiretórios de cada dia, para cada subdiretório você faz um
>> >> >> readdir
>> >> >> com
>> >> >> uma regex fazendo match em /\d+ERR$/. Daí você abre o arquivo e faz
>> >> >> um
>> >> >> while
>> >> >> no arquivo, até encontrar uma linha com erro, imprime o nome do
>> >> >> arquivo
>> >> >> e
>> >> >> sai do loop do arquivo.
>> >> >>
>> >> >> Abraços!
>> >> >>
>> >> >>
>> >> >> · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · · ·
>> >> >> Leonardo Ruoso (CE1921JP)
>> >> >> http://lattes.cnpq.br/2719086566536387 -
>> >> >> http://br.linkedin.com/in/lruoso
>> >> >> leonardo em oktiva.com.br - (85) 8787-0312 - sip:87870312 em ekiga.net
>> >> >> Marketing, Comunicação Social e Tecnologia
>> >> >>
>> >> >> http://norvig.com/21-days.html
>> >> >>
>> >> >>
>> >> >> 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>
>> >> >>>
>> >> >>> Seguinte,
>> >> >>>
>> >> >>> Imagina que tenho a pasta chamada 201008 e meu script perl está
>> >> >>> nessa
>> >> >>> pasta.
>> >> >>> 201008
>> >> >>>       |_____20100801
>> >> >>>       |_____20100802
>> >> >>>       |_____20100803
>> >> >>>       |_____...
>> >> >>>       |_____script.pl
>> >> >>>
>> >> >>> Dentro de cada pasta existem vários arquivos com nome que eu
>> >> >>> desconheço,
>> >> >>> mas que tem o final -ERR.
>> >> >>> por exemplo
>> >> >>>
>> >> >>> na o pasta 20100801 possui 3 arquivos com nomes XXXXXXXX-ERR
>> >> >>> YYYYYYYY-ERR e ZZZZZZZZ-ERR
>> >> >>>
>> >> >>> quero abrir todos esses arquivos com final ERR e verificar se ao
>> >> >>> final
>> >> >>> de
>> >> >>> CADA LINHA possui 000000000
>> >> >>> se possuir no final de cada linha 000000000, imprimir o nome do
>> >> >>> arquivo
>> >> >>> que tiver todas linhas com 000000000. Se alguma linha, no FINAL
>> >> >>> dela
>> >> >>> tiver
>> >> >>> algum numero onde a sequencia seja diferente de zero não imprimi.
>> >> >>>
>> >> >>> Exemplo.
>> >> >>>
>> >> >>> File XXXXXXX-ERR
>> >> >>> linha 1  teste blabla43 000000000
>> >> >>> linha 2  teste blabla32 000000000
>> >> >>> linha 3  teste blabla12 000000000
>> >> >>> ...
>> >> >>> linha n xxxxxxxxxxx   000000000
>> >> >>>
>> >> >>>
>> >> >>> File YYYYYY-ERR
>> >> >>> linha 1  teste blabla43 000000200
>> >> >>> linha 2  teste blabla32 000000000
>> >> >>> linha 3  teste blabla12 000000000
>> >> >>> ...
>> >> >>> linha n xxxxxxxxxxx   000000000
>> >> >>>
>> >> >>>
>> >> >>> No arquivo XXXXXX todas ultimas colunas são com sequencia zero.
>> >> >>>
>> >> >>> Já o YYYYYY não. Então ira imprimir apenas o nome do arquivo
>> >> >>> XXXXXX-ERR e
>> >> >>> não o YYYYYY-ERR.
>> >> >>>
>> >> >>> Deu para entender?
>> >> >>>
>> >> >>>
>> >> >>> Em 16 de agosto de 2010 12:40, breno <breno em rio.pm.org> escreveu:
>> >> >>>>
>> >> >>>> Roan,
>> >> >>>>
>> >> >>>> também não sei se entendi o que vc tem e/ou quer fazer, mas acho
>> >> >>>> que
>> >> >>>> o
>> >> >>>> Blabos está no caminho certo. Dê uma olhada em:
>> >> >>>>
>> >> >>>> http://perldoc.perl.org/functions/readdir.html
>> >> >>>>
>> >> >>>> E veja se te ajuda, quando muito, a nos dar uma dica sobre qual é
>> >> >>>> exatamente o seu problema em mãos :-)
>> >> >>>>
>> >> >>>> []s
>> >> >>>>
>> >> >>>> -b
>> >> >>>>
>> >> >>>> 2010/8/16 Blabos de Blebe <blabos em gmail.com>:
>> >> >>>> > Nâo entendi o que vc está perguntando.
>> >> >>>> >
>> >> >>>> > Seria algo relacionado a opendir e readdir?
>> >> >>>> >
>> >> >>>> > 2010/8/16 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> >> >>>> >> Olá pessoal,
>> >> >>>> >>
>> >> >>>> >> Sem utilizar nenhum módulo do CPAN, gostaria de saber se eu
>> >> >>>> >> tenho
>> >> >>>> >> uma
>> >> >>>> >> arvore
>> >> >>>> >> de diretorios baseado em data.
>> >> >>>> >>
>> >> >>>> >> Tenho diretorios que é por dia tipo 20100816, 20100815..
>> >> >>>> >>
>> >> >>>> >> ja fiz um for onde tenho 201008 como default e concatena com um
>> >> >>>> >> contador do
>> >> >>>> >> dia 16 até 1 ai tudo bem.
>> >> >>>> >>
>> >> >>>> >> Gostaria de entrar nesses diretorios e abrir todos arquivos que
>> >> >>>> >> tem
>> >> >>>> >> no final
>> >> >>>> >> -ERR .
>> >> >>>> >>
>> >> >>>> >> Depois disso outra coisa q ja fiz é expressão regular que ja
>> >> >>>> >> fiz
>> >> >>>> >> para
>> >> >>>> >> pegar
>> >> >>>> >> o q tem zero no final do arquivo m/00000000/igo; se sim imprimi
>> >> >>>> >> o
>> >> >>>> >> nome
>> >> >>>> >> odarquivo senão não faz nada.
>> >> >>>> >>
>> >> >>>> >> Obrigado
>> >> >>>> >>
>> >> >>>> >> --
>> >> >>>> >> Atenciosamente,
>> >> >>>> >>
>> >> >>>> >> Roan Brasil Monteiro
>> >> >>>> >> http://roanbrasil.wordpress.com/
>> >> >>>> >> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >> >>>> >>
>> >> >>>> >>
>> >> >>>> >> _______________________________________________
>> >> >>>> >> Cascavel-pm mailing list
>> >> >>>> >> Cascavel-pm em pm.org
>> >> >>>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >>>> >>
>> >> >>>> > _______________________________________________
>> >> >>>> > Cascavel-pm mailing list
>> >> >>>> > Cascavel-pm em pm.org
>> >> >>>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >>>> >
>> >> >>>> _______________________________________________
>> >> >>>> Cascavel-pm mailing list
>> >> >>>> Cascavel-pm em pm.org
>> >> >>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >>>
>> >> >>>
>> >> >>>
>> >> >>> --
>> >> >>> Atenciosamente,
>> >> >>>
>> >> >>> Roan Brasil Monteiro
>> >> >>> http://roanbrasil.wordpress.com/
>> >> >>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> >> >>>
>> >> >>>
>> >> >>> _______________________________________________
>> >> >>> Cascavel-pm mailing list
>> >> >>> Cascavel-pm em pm.org
>> >> >>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >>
>> >> >>
>> >> >> _______________________________________________
>> >> >> Cascavel-pm mailing list
>> >> >> Cascavel-pm em pm.org
>> >> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >
>> >> >
>> >> > _______________________________________________
>> >> > Cascavel-pm mailing list
>> >> > Cascavel-pm em pm.org
>> >> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >> >
>> >>
>> >>
>> >>
>> >> --
>> >> http://www.danielmantovani.com
>> >>
>> >> "If you?ve never written anything thoughtful, then you?ve never had
>> >> any difficult, important, or interesting thoughts. That?s the secret:
>> >> people who don?t write, are people who don?t think."
>> >> _______________________________________________
>> >> 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
>> >
>>
>>
>>
>> --
>> http://www.danielmantovani.com
>>
>> "If you?ve never written anything thoughtful, then you?ve never had
>> any difficult, important, or interesting thoughts. That?s the secret:
>> people who don?t write, are people who don?t think."
>> _______________________________________________
>> 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
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From braun.lima em gmail.com  Mon Aug 16 15:54:40 2010
From: braun.lima em gmail.com (Marco Lima)
Date: Mon, 16 Aug 2010 19:54:40 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=DoEf72u+M1OmCzC03xUUT+P-2KRM5dVd9x2C=@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
	<AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
	<AANLkTi=DoEf72u+M1OmCzC03xUUT+P-2KRM5dVd9x2C=@mail.gmail.com>
Message-ID: <AANLkTike+qBK58UkxFTu4=O-+HWVpJ225spbSHMAC428@mail.gmail.com>

OK!

Entaum vocêz estão falando que com -E, sou obrigado a ter #!perl -E certo!?
ou seja, o seguinte código é menor, porque não preciso de nada disso!

map{open$x,$_;print if!grep!/0{9}$/,<$x>}<*ERR>

47! Agora então é menor!!! =P

Marco Lima
braun.lima em gmail.com
im:mago em jabber-br.org <im%3Amago em jabber-br.org>

Register Linux User #355235
Slackware Linux, for the subgenius

"Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
um dever de quem tem."

"Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."

"Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
possa ensinar"



Em 16 de agosto de 2010 19:46, Daniel de Oliveira Mantovani <
daniel.oliveira.mantovani em gmail.com> escreveu:

> o caso do código acima você teria que fazer,
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/b58c1996/attachment.html>

From braun.lima em gmail.com  Mon Aug 16 16:06:13 2010
From: braun.lima em gmail.com (Marco Lima)
Date: Mon, 16 Aug 2010 20:06:13 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTike+qBK58UkxFTu4=O-+HWVpJ225spbSHMAC428@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
	<AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
	<AANLkTi=DoEf72u+M1OmCzC03xUUT+P-2KRM5dVd9x2C=@mail.gmail.com>
	<AANLkTike+qBK58UkxFTu4=O-+HWVpJ225spbSHMAC428@mail.gmail.com>
Message-ID: <AANLkTimT6XTS51RW03SU9fvNqF5Ly0j=Omyp8kUGmvVy@mail.gmail.com>

Já que tiramos fora as features ...

vamos nessa:

map{open A,$_;print if!grep!/0{9}$/,<A>}<*ERR>

46! Agora então é menor!!! =P

Mas para os que preferem com as features:

perl -E'map{open A,$_;say if!grep!/0{9}$/,<A>}<*ERR>'

53!



Marco Lima
braun.lima em gmail.com
im:mago em jabber-br.org <im%3Amago em jabber-br.org>


Em 16 de agosto de 2010 19:54, Marco Lima <braun.lima em gmail.com> escreveu:

> OK!
>
> Entaum vocêz estão falando que com -E, sou obrigado a ter #!perl -E
> certo!? ou seja, o seguinte código é menor, porque não preciso de nada
> disso!
>
> map{open$x,$_;print if!grep!/0{9}$/,<$x>}<*ERR>
>
> 47! Agora então é menor!!! =P
>
> Marco Lima
> braun.lima em gmail.com
> im:mago em jabber-br.org <im%3Amago em jabber-br.org>
>
> Register Linux User #355235
> Slackware Linux, for the subgenius
>
> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
> um dever de quem tem."
>
> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
> Esta paixão é, na realidade, uma atividade significativa, inspiradora e
> prazerosa para o indivíduo, seja ela rotulada como "trabalho" ou como
> "diversão."
>
> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
> possa ensinar"
>
>
>
> Em 16 de agosto de 2010 19:46, Daniel de Oliveira Mantovani <
> daniel.oliveira.mantovani em gmail.com> escreveu:
>
> o caso do código acima você teria que fazer,
>>
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100816/49d9f559/attachment-0001.html>

From gabriel.vieira em gmail.com  Mon Aug 16 16:11:39 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Mon, 16 Aug 2010 20:11:39 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimT6XTS51RW03SU9fvNqF5Ly0j=Omyp8kUGmvVy@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTims2aL1gWYrgD-x-hKHPXY5HiY1QxJGtq=bA34a@mail.gmail.com>
	<AANLkTik_RXv_Ekmt9E=x89ssGd+eGYT5EPrioFO1jeCY@mail.gmail.com>
	<AANLkTinB_ZAUbOkiYbaAg7jameLhVpHRowjNEpX7d_w-@mail.gmail.com>
	<AANLkTikwYFoHLWn3WdrYTUnZq_08XzjzgmSJLGXuCCz-@mail.gmail.com>
	<AANLkTi=JzCYVxZMVO2AAuXZ6En3q0d=XYBNpu4FasQEy@mail.gmail.com>
	<AANLkTi=YsJoCEoTer7jyCh91F0Ew87ZM0U8Ph1AwcrBR@mail.gmail.com>
	<AANLkTikF7crrF33Ba6PmciuatbHk=QCOxCkH8yC+m8jV@mail.gmail.com>
	<AANLkTi=DoEf72u+M1OmCzC03xUUT+P-2KRM5dVd9x2C=@mail.gmail.com>
	<AANLkTike+qBK58UkxFTu4=O-+HWVpJ225spbSHMAC428@mail.gmail.com>
	<AANLkTimT6XTS51RW03SU9fvNqF5Ly0j=Omyp8kUGmvVy@mail.gmail.com>
Message-ID: <AANLkTi=xL8OhLnF+2Hot4OprdX=DPEb01wWvFbT8Pcrv@mail.gmail.com>

2010/8/16 Marco Lima <braun.lima em gmail.com>:
> Já que tiramos fora as features ...
>
> vamos nessa:
>
> map{open A,$_;print if!grep!/0{9}$/,<A>}<*ERR>
>
> 46! Agora então é menor!!! =P
>
> Mas para os que preferem com as features:
>
> perl -E'map{open A,$_;say if!grep!/0{9}$/,<A>}<*ERR>'

boa tacada em! vacilei!
mago++


>
> 53!
>
>
>
> Marco Lima
> braun.lima em gmail.com
> im:mago em jabber-br.org
>
>
> Em 16 de agosto de 2010 19:54, Marco Lima <braun.lima em gmail.com> escreveu:
>>
>> OK!
>>
>> Entaum vocêz estão falando que com -E, sou obrigado a ter #!perl -E
>> certo!? ou seja, o seguinte código é menor, porque não preciso de nada
>> disso!
>>
>> map{open$x,$_;print if!grep!/0{9}$/,<$x>}<*ERR>
>>
>> 47! Agora então é menor!!! =P
>>
>> Marco Lima
>> braun.lima em gmail.com
>> im:mago em jabber-br.org
>>
>> Register Linux User #355235
>> Slackware Linux, for the subgenius
>>
>> "Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
>> um dever de quem tem."
>>
>> "Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão.
>> Esta paixão é, na realidade, uma atividade significativa, inspiradora e
>> prazerosa para o indivíduo, seja ela rotulada como "trabalho" ou como
>> "diversão."
>>
>> "Ninguém é tão grande que não possa aprender, e nem tão pequeno que não
>> possa ensinar"
>>
>>
>>
>> Em 16 de agosto de 2010 19:46, Daniel de Oliveira Mantovani
>> <daniel.oliveira.mantovani em gmail.com> escreveu:
>>>
>>> o caso do código acima você teria que fazer,
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From edencardim em gmail.com  Tue Aug 17 05:14:23 2010
From: edencardim em gmail.com (Eden Cardim)
Date: Tue, 17 Aug 2010 09:14:23 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	(Vanderson Sampaio's message of "Mon, 16 Aug 2010 14:26:26 -0400")
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
Message-ID: <m2iq39qvvk.fsf@gmail.com>

>>>>> "Vanderson" == Vanderson Sampaio <vandersons em gmail.com> writes:

    Vanderson> Digna de aplausos a atitude do Nilson! Estou sendo
    Vanderson> sincero.Dada a retratação pública, quem deve desculpas
    Vanderson> agora sou eu.Se a intenção do texto também era educativa,
    Vanderson> me desculpe pela generalização.  Entendo que as vezes
    Vanderson> escrevemos algo na melhor das intenções e o leitor
    Vanderson> interpreta de forma diferente daquela que
    Vanderson> escrevemos. Coisas da linguagem escrita.Desculpas
    Vanderson> pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!

Eu acho que a tua reclamação não procede. O Nilson foi objetivo e ajudou
muito mais do que você.

-- 
   Eden Cardim       Need help with your Catalyst or DBIx::Class project?
  Code Monkey                    http://www.shadowcat.co.uk/catalyst/
 Shadowcat Systems Ltd.  Want a managed development or deployment platform?
http://blog.edencardim.com/            http://www.shadowcat.co.uk/servers/

From blabos em gmail.com  Tue Aug 17 05:47:51 2010
From: blabos em gmail.com (Blabos de Blebe)
Date: Tue, 17 Aug 2010 09:47:51 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <m2iq39qvvk.fsf@gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	<m2iq39qvvk.fsf@gmail.com>
Message-ID: <AANLkTi=XD4dfKFDfm+kSiNP5i=QPny7r20Zs_JO+u49J@mail.gmail.com>

Eu acho que vocês andam muito sensíveis...

Estão precisando de um abraço?

http://bit.ly/9NcGJe

2010/8/17 Eden Cardim <edencardim em gmail.com>:
>>>>>> "Vanderson" == Vanderson Sampaio <vandersons em gmail.com> writes:
>
>    Vanderson> Digna de aplausos a atitude do Nilson! Estou sendo
>    Vanderson> sincero.Dada a retratação pública, quem deve desculpas
>    Vanderson> agora sou eu.Se a intenção do texto também era educativa,
>    Vanderson> me desculpe pela generalização.  Entendo que as vezes
>    Vanderson> escrevemos algo na melhor das intenções e o leitor
>    Vanderson> interpreta de forma diferente daquela que
>    Vanderson> escrevemos. Coisas da linguagem escrita.Desculpas
>    Vanderson> pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!
>
> Eu acho que a tua reclamação não procede. O Nilson foi objetivo e ajudou
> muito mais do que você.
>
> --
>   Eden Cardim       Need help with your Catalyst or DBIx::Class project?
>  Code Monkey                    http://www.shadowcat.co.uk/catalyst/
>  Shadowcat Systems Ltd.  Want a managed development or deployment platform?
> http://blog.edencardim.com/            http://www.shadowcat.co.uk/servers/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From andregarciacarneiro em gmail.com  Tue Aug 17 05:51:22 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Tue, 17 Aug 2010 09:51:22 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTi=XD4dfKFDfm+kSiNP5i=QPny7r20Zs_JO+u49J@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	<m2iq39qvvk.fsf@gmail.com>
	<AANLkTi=XD4dfKFDfm+kSiNP5i=QPny7r20Zs_JO+u49J@mail.gmail.com>
Message-ID: <AANLkTimdnYbuiBOSJ85oxC0Dn9v7tddbVYA4mwPV716w@mail.gmail.com>

Cerveja talvez... ( sim, isso é uma desculpa para ir encher a cara... )




Cheers!

Em 17 de agosto de 2010 09:47, Blabos de Blebe <blabos em gmail.com> escreveu:

> Eu acho que vocês andam muito sensíveis...
>
> Estão precisando de um abraço?
>
> http://bit.ly/9NcGJe
>
>

-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100817/a79eeef7/attachment.html>

From roanbrasil em gmail.com  Tue Aug 17 05:56:17 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Tue, 17 Aug 2010 09:56:17 -0300
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <AANLkTimdnYbuiBOSJ85oxC0Dn9v7tddbVYA4mwPV716w@mail.gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	<m2iq39qvvk.fsf@gmail.com>
	<AANLkTi=XD4dfKFDfm+kSiNP5i=QPny7r20Zs_JO+u49J@mail.gmail.com>
	<AANLkTimdnYbuiBOSJ85oxC0Dn9v7tddbVYA4mwPV716w@mail.gmail.com>
Message-ID: <AANLkTing+fyhzPwNMWA_UD5_3U8H-M90eXQ6WVvLVrNY@mail.gmail.com>

Cerveja?

Aonde?

Quando?

2010/8/17 Andre Carneiro <andregarciacarneiro em gmail.com>

> Cerveja talvez... ( sim, isso é uma desculpa para ir encher a cara... )
>
>
>
>
> Cheers!
>
> Em 17 de agosto de 2010 09:47, Blabos de Blebe <blabos em gmail.com>escreveu:
>
> Eu acho que vocês andam muito sensíveis...
>>
>> Estão precisando de um abraço?
>>
>> http://bit.ly/9NcGJe
>>
>>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100817/0e92f42a/attachment.html>

From vandersons em gmail.com  Tue Aug 17 06:51:08 2010
From: vandersons em gmail.com (Vanderson Sampaio)
Date: Tue, 17 Aug 2010 09:51:08 -0400
Subject: [Cascavel-pm] Ajuda
In-Reply-To: <m2iq39qvvk.fsf@gmail.com>
References: <AANLkTi=uHph+k-9bUK=jMRAH9p7cWx4gS9Sg9w6eZd=w@mail.gmail.com>
	<AANLkTikZwC-73+V9kgRvq7NKaRKTrvEHwbg=ZO+sOCNB@mail.gmail.com>
	<AANLkTiktOYUc4RVDGxsULDrX16UC4qtOvaz5ts2DESeN@mail.gmail.com>
	<AANLkTimZn8qLopPnHU-jjcAsfnUpY90AP6nWm-eMXgZG@mail.gmail.com>
	<AANLkTi=Ps=0gnCL_RSfVwbFO-d_dvxoxWiObw1hoDDPk@mail.gmail.com>
	<AANLkTimf27p38b2biczesHMQJUguZkPihAUyCgm5Mejj@mail.gmail.com>
	<AANLkTinia7b2Pmng-ZPRZXMXooWe-skm84hD+=ddRgEC@mail.gmail.com>
	<AANLkTinC3=gka2YF7oPRrgiaVbnkGd0G3sGMh-j1AoDC@mail.gmail.com>
	<AANLkTi=wCWx1SrRWKC=0r2VMHAwFP4tMbK4mk_zJUWK6@mail.gmail.com>
	<m2iq39qvvk.fsf@gmail.com>
Message-ID: <AANLkTimpkand0t8-4WwpseMOt55Ou6Y4pMwnMS5x41wK@mail.gmail.com>

Eu ACHO que não!

2010/8/17 Eden Cardim <edencardim em gmail.com>

> >>>>> "Vanderson" == Vanderson Sampaio <vandersons em gmail.com> writes:
>
>    Vanderson> Digna de aplausos a atitude do Nilson! Estou sendo
>    Vanderson> sincero.Dada a retratação pública, quem deve desculpas
>    Vanderson> agora sou eu.Se a intenção do texto também era educativa,
>    Vanderson> me desculpe pela generalização.  Entendo que as vezes
>    Vanderson> escrevemos algo na melhor das intenções e o leitor
>    Vanderson> interpreta de forma diferente daquela que
>    Vanderson> escrevemos. Coisas da linguagem escrita.Desculpas
>    Vanderson> pedidas, fatos esclarecidos, voltemos ao nosso cotidiano!
>
> Eu acho que a tua reclamação não procede. O Nilson foi objetivo e ajudou
> muito mais do que você.
>
> --
>   Eden Cardim       Need help with your Catalyst or DBIx::Class project?
>  Code Monkey                    http://www.shadowcat.co.uk/catalyst/
>  Shadowcat Systems Ltd.  Want a managed development or deployment platform?
> http://blog.edencardim.com/            http://www.shadowcat.co.uk/servers/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
MSc Vanderson Sampaio
Biólogo - FVS/AM
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100817/6f8150ff/attachment-0001.html>

From daniel.oliveira.mantovani em gmail.com  Mon Aug 23 17:19:36 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 23 Aug 2010 21:19:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
Message-ID: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>

Há alguns anos atrás, o Solli começou a ver um projeto de tradução da
documentação do Perl para o português brasileiro. Em paralelo, com a
criação da wiki da comunidade (perl.org.br), Joênio, Nelson e cia.
fizeram a iniciativa virar algo colaborativo e começaram a traduzir a
documentação toda. A comunidade Perl participou bastante, mas o
projeto aos poucos foi esfriando.

Agora vem a novidade: o Breno juntou toda documentação feita até agora
usando o POD2::Base do Adriano e lançou o POD2::PT_BR no CPAN! Podemos
ver a documentação pelo CPAN em
http://search.cpan.org/dist/POD2-PT_BR/

Ao instalar o módulo, vc pode ver a documentação traduzida direto do
perldoc! Por exemplo:

  perldoc -L PT_BR perlintro

Como o -L bota o original sempre que a tradução não tiver disponível,
podemos fazer um alias na linha de comando:

  alias perldoc='perldoc -L PT_BR'

E passar a usar diretamente:

  perldoc perlintro

O Breno Oliveira no canal do #brasil-pm (irc.org.perl)
nos incentivou a continuar a tradução desses documentos,
http://github.com/garu/POD2-PT_BR

Eu estou traduzindo agora o perlperf, que é um manual que fala sobre
optimização. Seria muito bom se a comunidade se unisse para essa
projeto de tradução.

Por favor, entrem no irc.perl.org #brasil-pm
http://bit.ly/bIdeef

Peçam para o Breno (garu), o status de commiter no repositório da
tradução, o link do repositório está acima.

Se você não quiser entrar no IRC, mande um e-mail para o Breno, com o
seu usuário do Github.
"breno" <breno em rio.pm.org>,

Não esqucendo, que vocês podem traduzir pela wiki também no Github.

Se você não tem conta no Github, não tem problema também, mande um
e-mail para ele com o documento que você gostaria traduzir, só para
ele checar se não tem ninguém traduzindo, aí você traduz e manda o
documento por e-mail.

Obrigado pela atenção de vocês.

Ter essa documentação traduzida para português é muito importante para
a comunidade brasileira.

-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From ednardo em lobo.eti.br  Tue Aug 24 13:17:48 2010
From: ednardo em lobo.eti.br (Ednardo Lobo)
Date: Tue, 24 Aug 2010 17:17:48 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
Message-ID: <4C7428EC.5050004@lobo.eti.br>

Estou com problemas para ler caracteres especiais de arquivos com a 
codificação Unicode (UTF-8).

Experimentem esse código:

my $x;

read STDIN,$x,1;

print $x;


Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.


Tentei as seguintes soluções mas não surtiram efeito:

1) use open ':encoding(utf8)';

2) binmode(STDIN,':utf8');


Alguma sugestão?


Grato,

-- 
     Ednardo Lobo

     www.lobo.eti.br

From gabriel.vieira em gmail.com  Tue Aug 24 13:34:09 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Tue, 24 Aug 2010 17:34:09 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
In-Reply-To: <4C7428EC.5050004@lobo.eti.br>
References: <4C7428EC.5050004@lobo.eti.br>
Message-ID: <AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>

2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
> Estou com problemas para ler caracteres especiais de arquivos com a
> codificação Unicode (UTF-8).
>
> Experimentem esse código:
>
> my $x;
>
> read STDIN,$x,1;
>
> print $x;
>
>
> Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.
>
>
> Tentei as seguintes soluções mas não surtiram efeito:
>
> 1) use open ':encoding(utf8)';
>
> 2) binmode(STDIN,':utf8');
>
>
> Alguma sugestão?

Você alterou a encode da entrada e conferiu com a saída, que não teve
a encode alterada

Teste:
---------------8<---------------
binmode(STDIN,":utf8");
binmode(STDOUT,":utf8");
my $x;
read STDIN, $x, 1;
print$x;
--------------->8---------------

>
>
> Grato,
>
> --
>    Ednardo Lobo
>
>    www.lobo.eti.br
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From daniel.oliveira.mantovani em gmail.com  Mon Aug 23 17:19:36 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 23 Aug 2010 21:19:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
Message-ID: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>

Há alguns anos atrás, o Solli começou a ver um projeto de tradução da
documentação do Perl para o português brasileiro. Em paralelo, com a
criação da wiki da comunidade (perl.org.br), Joênio, Nelson e cia.
fizeram a iniciativa virar algo colaborativo e começaram a traduzir a
documentação toda. A comunidade Perl participou bastante, mas o
projeto aos poucos foi esfriando.

Agora vem a novidade: o Breno juntou toda documentação feita até agora
usando o POD2::Base do Adriano e lançou o POD2::PT_BR no CPAN! Podemos
ver a documentação pelo CPAN em
http://search.cpan.org/dist/POD2-PT_BR/

Ao instalar o módulo, vc pode ver a documentação traduzida direto do
perldoc! Por exemplo:

  perldoc -L PT_BR perlintro

Como o -L bota o original sempre que a tradução não tiver disponível,
podemos fazer um alias na linha de comando:

  alias perldoc='perldoc -L PT_BR'

E passar a usar diretamente:

  perldoc perlintro

O Breno Oliveira no canal do #brasil-pm (irc.org.perl)
nos incentivou a continuar a tradução desses documentos,
http://github.com/garu/POD2-PT_BR

Eu estou traduzindo agora o perlperf, que é um manual que fala sobre
optimização. Seria muito bom se a comunidade se unisse para essa
projeto de tradução.

Por favor, entrem no irc.perl.org #brasil-pm
http://bit.ly/bIdeef

Peçam para o Breno (garu), o status de commiter no repositório da
tradução, o link do repositório está acima.

Se você não quiser entrar no IRC, mande um e-mail para o Breno, com o
seu usuário do Github.
"breno" <breno em rio.pm.org>,

Não esqucendo, que vocês podem traduzir pela wiki também no Github.

Se você não tem conta no Github, não tem problema também, mande um
e-mail para ele com o documento que você gostaria traduzir, só para
ele checar se não tem ninguém traduzindo, aí você traduz e manda o
documento por e-mail.

Obrigado pela atenção de vocês.

Ter essa documentação traduzida para português é muito importante para
a comunidade brasileira.

-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From ednardo em lobo.eti.br  Tue Aug 24 15:04:34 2010
From: ednardo em lobo.eti.br (Ednardo Lobo)
Date: Tue, 24 Aug 2010 19:04:34 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
In-Reply-To: <AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>
References: <4C7428EC.5050004@lobo.eti.br>
	<AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>
Message-ID: <4C7441F2.6070209@lobo.eti.br>

Gabriel,

Alterando a codificação da entrada (STDIN) e da saída (STDOUT) o 
caractere foi lido e impresso corretamente. Entretanto, operações como 
"eq" e "=~" aplicadas a caracteres especiais falhou, veja:

---------------------------
binmode(STDIN,":utf8");
binmode(STDOUT,":utf8");

my $x;

read STDIN, $x, 1;

if ($x =~ /^[cçaáº]/) {
     print "ok 1\n";
}

if ($x eq 'ç') {
     print "ok 2\n";
}

print "$x\n";
---------------------------


Grato,

Gabriel Vieira escreveu:
> 2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
>> Estou com problemas para ler caracteres especiais de arquivos com a
>> codificação Unicode (UTF-8).
>>
>> Experimentem esse código:
>>
>> my $x;
>>
>> read STDIN,$x,1;
>>
>> print $x;
>>
>>
>> Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.
>>
>>
>> Tentei as seguintes soluções mas não surtiram efeito:
>>
>> 1) use open ':encoding(utf8)';
>>
>> 2) binmode(STDIN,':utf8');
>>
>>
>> Alguma sugestão?
> 
> Você alterou a encode da entrada e conferiu com a saída, que não teve
> a encode alterada
> 
> Teste:
> ---------------8<---------------
> binmode(STDIN,":utf8");
> binmode(STDOUT,":utf8");
> my $x;
> read STDIN, $x, 1;
> print$x;
> --------------->8---------------


-- 
     Ednardo Lobo

     www.lobo.eti.br

From daniel.oliveira.mantovani em gmail.com  Tue Aug 24 15:12:09 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Tue, 24 Aug 2010 19:12:09 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
In-Reply-To: <AANLkTinxOHjf85Tk=qb+-774ZKG2ETASpR4qqZs4ZW9y@mail.gmail.com>
References: <4C7428EC.5050004@lobo.eti.br>
	<AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>
	<4C7441F2.6070209@lobo.eti.br>
	<AANLkTinxOHjf85Tk=qb+-774ZKG2ETASpR4qqZs4ZW9y@mail.gmail.com>
Message-ID: <AANLkTikdQ-EvBd+zrL6PbgVDLHF-Jt0DSBRmLewXvg5+@mail.gmail.com>

Quer dizer, http://mail.pm.org/pipermail/saopaulo-pm/2010/010691.html

Boa leitura.


2010/8/24 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>:
> Coloque, isso no começo do seu programa,
>
> use utf8;
>
> 2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
>> Gabriel,
>>
>> Alterando a codificação da entrada (STDIN) e da saída (STDOUT) o caractere
>> foi lido e impresso corretamente. Entretanto, operações como "eq" e "=~"
>> aplicadas a caracteres especiais falhou, veja:
>>
>> ---------------------------
>> binmode(STDIN,":utf8");
>> binmode(STDOUT,":utf8");
>>
>> my $x;
>>
>> read STDIN, $x, 1;
>>
>> if ($x =~ /^[cçaáº]/) {
>>    print "ok 1\n";
>> }
>>
>> if ($x eq 'ç') {
>>    print "ok 2\n";
>> }
>>
>> print "$x\n";
>> ---------------------------
>>
>>
>> Grato,
>>
>> Gabriel Vieira escreveu:
>>>
>>> 2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
>>>>
>>>> Estou com problemas para ler caracteres especiais de arquivos com a
>>>> codificação Unicode (UTF-8).
>>>>
>>>> Experimentem esse código:
>>>>
>>>> my $x;
>>>>
>>>> read STDIN,$x,1;
>>>>
>>>> print $x;
>>>>
>>>>
>>>> Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.
>>>>
>>>>
>>>> Tentei as seguintes soluções mas não surtiram efeito:
>>>>
>>>> 1) use open ':encoding(utf8)';
>>>>
>>>> 2) binmode(STDIN,':utf8');
>>>>
>>>>
>>>> Alguma sugestão?
>>>
>>> Você alterou a encode da entrada e conferiu com a saída, que não teve
>>> a encode alterada
>>>
>>> Teste:
>>> ---------------8<---------------
>>> binmode(STDIN,":utf8");
>>> binmode(STDOUT,":utf8");
>>> my $x;
>>> read STDIN, $x, 1;
>>> print$x;
>>> --------------->8---------------
>>
>>
>> --
>>    Ednardo Lobo
>>
>>    www.lobo.eti.br
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> http://www.danielmantovani.com
>
> "If you?ve never written anything thoughtful, then you?ve never had
> any difficult, important, or interesting thoughts. That?s the secret:
> people who don?t write, are people who don?t think."
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From daniel.oliveira.mantovani em gmail.com  Tue Aug 24 15:11:00 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Tue, 24 Aug 2010 19:11:00 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
In-Reply-To: <4C7441F2.6070209@lobo.eti.br>
References: <4C7428EC.5050004@lobo.eti.br>
	<AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>
	<4C7441F2.6070209@lobo.eti.br>
Message-ID: <AANLkTinxOHjf85Tk=qb+-774ZKG2ETASpR4qqZs4ZW9y@mail.gmail.com>

Coloque, isso no começo do seu programa,

use utf8;

2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
> Gabriel,
>
> Alterando a codificação da entrada (STDIN) e da saída (STDOUT) o caractere
> foi lido e impresso corretamente. Entretanto, operações como "eq" e "=~"
> aplicadas a caracteres especiais falhou, veja:
>
> ---------------------------
> binmode(STDIN,":utf8");
> binmode(STDOUT,":utf8");
>
> my $x;
>
> read STDIN, $x, 1;
>
> if ($x =~ /^[cçaáº]/) {
>    print "ok 1\n";
> }
>
> if ($x eq 'ç') {
>    print "ok 2\n";
> }
>
> print "$x\n";
> ---------------------------
>
>
> Grato,
>
> Gabriel Vieira escreveu:
>>
>> 2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
>>>
>>> Estou com problemas para ler caracteres especiais de arquivos com a
>>> codificação Unicode (UTF-8).
>>>
>>> Experimentem esse código:
>>>
>>> my $x;
>>>
>>> read STDIN,$x,1;
>>>
>>> print $x;
>>>
>>>
>>> Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.
>>>
>>>
>>> Tentei as seguintes soluções mas não surtiram efeito:
>>>
>>> 1) use open ':encoding(utf8)';
>>>
>>> 2) binmode(STDIN,':utf8');
>>>
>>>
>>> Alguma sugestão?
>>
>> Você alterou a encode da entrada e conferiu com a saída, que não teve
>> a encode alterada
>>
>> Teste:
>> ---------------8<---------------
>> binmode(STDIN,":utf8");
>> binmode(STDOUT,":utf8");
>> my $x;
>> read STDIN, $x, 1;
>> print$x;
>> --------------->8---------------
>
>
> --
>    Ednardo Lobo
>
>    www.lobo.eti.br
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From gabriel.vieira em gmail.com  Tue Aug 24 15:14:52 2010
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Tue, 24 Aug 2010 19:14:52 -0300
Subject: [Cascavel-pm] Problemas com "read" quando lendo caracteres UTF8
In-Reply-To: <4C7441F2.6070209@lobo.eti.br>
References: <4C7428EC.5050004@lobo.eti.br>
	<AANLkTimiQEuhoTgThwgvEVpezX1Aw14WWUqvjRWbV1qV@mail.gmail.com>
	<4C7441F2.6070209@lobo.eti.br>
Message-ID: <AANLkTinobUJg4gmnGb0ZksWCB5C4QE4mxzKYtS-6yGNZ@mail.gmail.com>

---------------8<---------------
use utf8; # Garante codificação utf8 dentro do próprio código (no caso
das comparações)

binmode(STDIN,":utf8");
binmode(STDOUT,":utf8");

my $x;

read STDIN, $x, 1;

chomp $x; # Retira o \n ao fim da entrada

if ($x =~ /^[cçaáº]/) {
   print "ok 1\n";
}

if ($x eq 'ç') {
   print "ok 2\n";
}

print "$x\n";
---------------8<---------------

Uma explicação legal feita pelo Adriano Ferreire pode ser vista em:
http://mail.pm.org/pipermail/saopaulo-pm/2010/010672.html
Nesta thread houve uma boa discussão sobre o tema.


Abraços,

2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
> Gabriel,
>
> Alterando a codificação da entrada (STDIN) e da saída (STDOUT) o caractere
> foi lido e impresso corretamente. Entretanto, operações como "eq" e "=~"
> aplicadas a caracteres especiais falhou, veja:
>
> ---------------------------
> binmode(STDIN,":utf8");
> binmode(STDOUT,":utf8");
>
> my $x;
>
> read STDIN, $x, 1;
>
> if ($x =~ /^[cçaáº]/) {
>    print "ok 1\n";
> }
>
> if ($x eq 'ç') {
>    print "ok 2\n";
> }
>
> print "$x\n";
> ---------------------------
>
>
> Grato,
>
> Gabriel Vieira escreveu:
>>
>> 2010/8/24 Ednardo Lobo <ednardo em lobo.eti.br>:
>>>
>>> Estou com problemas para ler caracteres especiais de arquivos com a
>>> codificação Unicode (UTF-8).
>>>
>>> Experimentem esse código:
>>>
>>> my $x;
>>>
>>> read STDIN,$x,1;
>>>
>>> print $x;
>>>
>>>
>>> Caracteres especiais como "á", "ç" e "º" não serão lidos corretamente.
>>>
>>>
>>> Tentei as seguintes soluções mas não surtiram efeito:
>>>
>>> 1) use open ':encoding(utf8)';
>>>
>>> 2) binmode(STDIN,':utf8');
>>>
>>>
>>> Alguma sugestão?
>>
>> Você alterou a encode da entrada e conferiu com a saída, que não teve
>> a encode alterada
>>
>> Teste:
>> ---------------8<---------------
>> binmode(STDIN,":utf8");
>> binmode(STDOUT,":utf8");
>> my $x;
>> read STDIN, $x, 1;
>> print$x;
>> --------------->8---------------
>
>
> --
>    Ednardo Lobo
>
>    www.lobo.eti.br
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From otaviof em gmail.com  Wed Aug 25 01:32:42 2010
From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=)
Date: Wed, 25 Aug 2010 10:32:42 +0200
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
In-Reply-To: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>
References: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>
Message-ID: <AANLkTim=ZFXyEmKU_Mamg4Y+Jnjw5QA07c5ExwVO9OVk@mail.gmail.com>

2010/8/24 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>:
(...)
> Ao instalar o módulo, vc pode ver a documentação traduzida direto do
> perldoc! Por exemplo:
>
>  perldoc -L PT_BR perlintro
>
> Como o -L bota o original sempre que a tradução não tiver disponível,
> podemos fazer um alias na linha de comando:
>
>  alias perldoc='perldoc -L PT_BR'
>
(...)

Mantovani,

Primeiro, parabéns aos envolvidos, é uma ótima inciativa!

Porem, esta parte de informar a língua ("-L PT_BR") me incomoda um
pouco. Você sabe se a linguagem do SO estiver configurada para pt_BR
ele não exibiria automaticamente?

No meu caso:
    $ echo $LANG
    en_US.UTF-8

Se não for desta forma, merece um patch :-).

um abraço,

P.S.: Não tenho a mínima ideia de como isso funcionaria no Windows.

-- 
Otávio Fernandes
otaviof at ( gmail.com, cpan.org )
http://github.com/otaviof

From daniel.oliveira.mantovani em gmail.com  Mon Aug 23 17:19:36 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 23 Aug 2010 21:19:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
Message-ID: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>

Há alguns anos atrás, o Solli começou a ver um projeto de tradução da
documentação do Perl para o português brasileiro. Em paralelo, com a
criação da wiki da comunidade (perl.org.br), Joênio, Nelson e cia.
fizeram a iniciativa virar algo colaborativo e começaram a traduzir a
documentação toda. A comunidade Perl participou bastante, mas o
projeto aos poucos foi esfriando.

Agora vem a novidade: o Breno juntou toda documentação feita até agora
usando o POD2::Base do Adriano e lançou o POD2::PT_BR no CPAN! Podemos
ver a documentação pelo CPAN em
http://search.cpan.org/dist/POD2-PT_BR/

Ao instalar o módulo, vc pode ver a documentação traduzida direto do
perldoc! Por exemplo:

  perldoc -L PT_BR perlintro

Como o -L bota o original sempre que a tradução não tiver disponível,
podemos fazer um alias na linha de comando:

  alias perldoc='perldoc -L PT_BR'

E passar a usar diretamente:

  perldoc perlintro

O Breno Oliveira no canal do #brasil-pm (irc.org.perl)
nos incentivou a continuar a tradução desses documentos,
http://github.com/garu/POD2-PT_BR

Eu estou traduzindo agora o perlperf, que é um manual que fala sobre
optimização. Seria muito bom se a comunidade se unisse para essa
projeto de tradução.

Por favor, entrem no irc.perl.org #brasil-pm
http://bit.ly/bIdeef

Peçam para o Breno (garu), o status de commiter no repositório da
tradução, o link do repositório está acima.

Se você não quiser entrar no IRC, mande um e-mail para o Breno, com o
seu usuário do Github.
"breno" <breno em rio.pm.org>,

Não esqucendo, que vocês podem traduzir pela wiki também no Github.

Se você não tem conta no Github, não tem problema também, mande um
e-mail para ele com o documento que você gostaria traduzir, só para
ele checar se não tem ninguém traduzindo, aí você traduz e manda o
documento por e-mail.

Obrigado pela atenção de vocês.

Ter essa documentação traduzida para português é muito importante para
a comunidade brasileira.

-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From daniel.oliveira.mantovani em gmail.com  Mon Aug 23 17:19:36 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 23 Aug 2010 21:19:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
Message-ID: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>

Há alguns anos atrás, o Solli começou a ver um projeto de tradução da
documentação do Perl para o português brasileiro. Em paralelo, com a
criação da wiki da comunidade (perl.org.br), Joênio, Nelson e cia.
fizeram a iniciativa virar algo colaborativo e começaram a traduzir a
documentação toda. A comunidade Perl participou bastante, mas o
projeto aos poucos foi esfriando.

Agora vem a novidade: o Breno juntou toda documentação feita até agora
usando o POD2::Base do Adriano e lançou o POD2::PT_BR no CPAN! Podemos
ver a documentação pelo CPAN em
http://search.cpan.org/dist/POD2-PT_BR/

Ao instalar o módulo, vc pode ver a documentação traduzida direto do
perldoc! Por exemplo:

  perldoc -L PT_BR perlintro

Como o -L bota o original sempre que a tradução não tiver disponível,
podemos fazer um alias na linha de comando:

  alias perldoc='perldoc -L PT_BR'

E passar a usar diretamente:

  perldoc perlintro

O Breno Oliveira no canal do #brasil-pm (irc.org.perl)
nos incentivou a continuar a tradução desses documentos,
http://github.com/garu/POD2-PT_BR

Eu estou traduzindo agora o perlperf, que é um manual que fala sobre
optimização. Seria muito bom se a comunidade se unisse para essa
projeto de tradução.

Por favor, entrem no irc.perl.org #brasil-pm
http://bit.ly/bIdeef

Peçam para o Breno (garu), o status de commiter no repositório da
tradução, o link do repositório está acima.

Se você não quiser entrar no IRC, mande um e-mail para o Breno, com o
seu usuário do Github.
"breno" <breno em rio.pm.org>,

Não esqucendo, que vocês podem traduzir pela wiki também no Github.

Se você não tem conta no Github, não tem problema também, mande um
e-mail para ele com o documento que você gostaria traduzir, só para
ele checar se não tem ninguém traduzindo, aí você traduz e manda o
documento por e-mail.

Obrigado pela atenção de vocês.

Ter essa documentação traduzida para português é muito importante para
a comunidade brasileira.

-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From daniel.oliveira.mantovani em gmail.com  Mon Aug 23 17:19:36 2010
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Mon, 23 Aug 2010 21:19:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Tradu=E7=E3o_da_documenta=E7=E3o_ofi?=
	=?iso-8859-1?q?cial_do_Perl?=
Message-ID: <AANLkTinhKrrdQ2vCLf7eDOASP2_RRo-7Dxhfqy3AaT0L@mail.gmail.com>

Há alguns anos atrás, o Solli começou a ver um projeto de tradução da
documentação do Perl para o português brasileiro. Em paralelo, com a
criação da wiki da comunidade (perl.org.br), Joênio, Nelson e cia.
fizeram a iniciativa virar algo colaborativo e começaram a traduzir a
documentação toda. A comunidade Perl participou bastante, mas o
projeto aos poucos foi esfriando.

Agora vem a novidade: o Breno juntou toda documentação feita até agora
usando o POD2::Base do Adriano e lançou o POD2::PT_BR no CPAN! Podemos
ver a documentação pelo CPAN em
http://search.cpan.org/dist/POD2-PT_BR/

Ao instalar o módulo, vc pode ver a documentação traduzida direto do
perldoc! Por exemplo:

  perldoc -L PT_BR perlintro

Como o -L bota o original sempre que a tradução não tiver disponível,
podemos fazer um alias na linha de comando:

  alias perldoc='perldoc -L PT_BR'

E passar a usar diretamente:

  perldoc perlintro

O Breno Oliveira no canal do #brasil-pm (irc.org.perl)
nos incentivou a continuar a tradução desses documentos,
http://github.com/garu/POD2-PT_BR

Eu estou traduzindo agora o perlperf, que é um manual que fala sobre
optimização. Seria muito bom se a comunidade se unisse para essa
projeto de tradução.

Por favor, entrem no irc.perl.org #brasil-pm
http://bit.ly/bIdeef

Peçam para o Breno (garu), o status de commiter no repositório da
tradução, o link do repositório está acima.

Se você não quiser entrar no IRC, mande um e-mail para o Breno, com o
seu usuário do Github.
"breno" <breno em rio.pm.org>,

Não esqucendo, que vocês podem traduzir pela wiki também no Github.

Se você não tem conta no Github, não tem problema também, mande um
e-mail para ele com o documento que você gostaria traduzir, só para
ele checar se não tem ninguém traduzindo, aí você traduz e manda o
documento por e-mail.

Obrigado pela atenção de vocês.

Ter essa documentação traduzida para português é muito importante para
a comunidade brasileira.

-- 
http://www.danielmantovani.com

"If you?ve never written anything thoughtful, then you?ve never had
any difficult, important, or interesting thoughts. That?s the secret:
people who don?t write, are people who don?t think."

From roanbrasil em gmail.com  Thu Aug 26 11:39:56 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Thu, 26 Aug 2010 15:39:56 -0300
Subject: [Cascavel-pm] Download Zip File
Message-ID: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>

Galera fiz um projeto aqui e estou fazendo download de um zip file, só que
não estou conseguindo usando a lib, alguem pode me ajudar?

Parser.pm
{
    package Parser;
    use HTML::TreeBuilder::XPath;

    sub new{
         my $class = shift;
            my $self = {};
           bless $self, $class;
         return $self;
    }

    sub extractHrefContent{
        my $self = shift;
        my $html_content = shift;
        my $tree = HTML::TreeBuilder::XPath->new;
        $tree->parse_content(do { local($/); $html_content});
        my @array;
        my $cont = 0;
        for my $result ($tree->findnodes(q{/html/body/ul/li})) {
            my $x = HTML::TreeBuilder::XPath->new;
            $x->parse($result->as_HTML);
            my $variavel = $x->findvalue(q{//a});
            $array[$cont]= $variavel;
            $cont++;
        }
        return @array;
    }
    return 1;
}


Login.pm
{
package Login;
use WWW::Mechanize;
use MIME::Base64;
use HTTP::Response;

sub new{
      my $class = shift;
       my $self = {};
      bless $self, $class;
      return $self;
}

sub request_uri(){
    my $self = shift;
    my $url = shift;
    my $agent = WWW::Mechanize->new();
    my @args = (
    Authorization => "Basic " .
    MIME::Base64::encode( 'user' . ':' .'password' )
    );

    # $agent->credentials( ADDRESS, REALM, USER, PASS );
    my $res = HTTP::Response->new;
    $res =
        $agent->get( $url,
                    @args );

    my $html_content = $res->decoded_content;
    return $html_content;
}
 return 1;
}


ReleaseControlDownloader.pm

package ReleaseControlDownloader;
use strict;
use Login;
use Parser;
use Net::Download::Queue;

#     URL de requisição
     my $url = 'http://200.124.194.230/Getnet';
#     request URL and get the html content
     my $login = Login->new();
     my $html_content = $login->request_uri($url);


     my $parser = Parser->new();
     my @list = $parser->extractHrefContent($html_content);

     my $cont = 0;
     while($cont < $#list){
        my $variavel = $list[$cont];
        $cont++;
        # tira o espaço em branco
        $variavel =~ s/\s//g;  ;
        my $complete_url = $url."/".$variavel;
        if($cont==5){
            my $oQueue = Net::Download::Queue->new() or die;
              my $oDownload = $oQueue->oDownloadAdd(
            $complete_url,
              "C:\\",
              $variavel,
              ) or die;
        }
     }



Até mesmo se eu pegar um pagina qualquer para fazer o download por exemplo
qualquer  URL.zip para eu testar.

Alguem se habilita? GOLFFFFFFFFFFFFFFFFFFFFFFFFFFFF


-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/75b1e078/attachment.html>

From breno em rio.pm.org  Thu Aug 26 12:45:03 2010
From: breno em rio.pm.org (breno)
Date: Thu, 26 Aug 2010 16:45:03 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
References: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
Message-ID: <AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>

2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> Galera fiz um projeto aqui e estou fazendo download de um zip file, só que
> não estou conseguindo usando a lib, alguem pode me ajudar?
>

Você pode dar um exemplo do html que está fazendo parsing? Ou do
conteúdo das variáveis em cada ponto crítico da execução? Ou o que seu
programa deveria fazer mas não está fazendo? Ou alguma mensagem de
erro?

Baixar um zip com Perl pode ser tão simples quanto:

perl -MLWP::Simple -e 'getprint
q[http://strawberryperl.cload/5.12.1.0/strawberry-perl-5.12.1.0.zip]'
> strawberry.zip

[]s

-b

From breno em rio.pm.org  Thu Aug 26 12:46:51 2010
From: breno em rio.pm.org (breno)
Date: Thu, 26 Aug 2010 16:46:51 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>
References: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
	<AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>
Message-ID: <AANLkTikUbY2+oqzgtaqC7=d_fFYuCza7DgN64+k5UAON@mail.gmail.com>

2010/8/26 breno <breno em rio.pm.org>:
> 2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> Galera fiz um projeto aqui e estou fazendo download de um zip file, só que
>> não estou conseguindo usando a lib, alguem pode me ajudar?
>>
>
> Você pode dar um exemplo do html que está fazendo parsing? Ou do
> conteúdo das variáveis em cada ponto crítico da execução? Ou o que seu
> programa deveria fazer mas não está fazendo? Ou alguma mensagem de
> erro?
>
> Baixar um zip com Perl pode ser tão simples quanto:
>
> perl -MLWP::Simple -e 'getprint
> q[http://strawberryperl.cload/5.12.1.0/strawberry-perl-5.12.1.0.zip]'
>> strawberry.zip
>

Legal, truncou o link, deveria ser http://strawberryperl.com/download/...

From roanbrasil em gmail.com  Thu Aug 26 13:05:02 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Thu, 26 Aug 2010 17:05:02 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>
References: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
	<AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>
Message-ID: <AANLkTintL7nf8wdHXSwHoKog41wgXCHQscNG31MT7PPV@mail.gmail.com>

O parsing funciona ja, mas posso sim... eu ja testei, fui fazendo por
etapas, e já está funcionando

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<html>
 <head>
  <title>Index of /Getnet</title>
 </head>
 <body>
<h1>Index of /Getnet</h1>
<ul><li><a href="/"> Parent Directory</a></li>
<li><a href="01_ACQR_21376_DML.zip"> 01_ACQR_21376_DML.zip</a></li>
<li><a href="01_ACQR_PATCH_022010.2_DML.zip">
01_ACQR_PATCH_022010.2_DML.zip</a></li>
<li><a href="049-091126-029-A-20051.zip">
049-091126-029-A-20051.zip</a></li>
<li><a href="049-091126-029-A-20051_outdated.zip">
049-091126-029-A-20051_outdated.zip</a></li>
<li><a href="049-091126-030-A-20052.zip">
049-091126-030-A-20052.zip</a></li>
<li><a href="049-091126-030-A-20052_outdated.zip">
049-091126-030-A-20052_outdated.zip</a></li>
<li><a href="049-091126-031-A-20049.zip">
049-091126-031-A-20049.zip</a></li>
<li><a href="049-091130-032-A-19935.1.zip">
049-091130-032-A-19935.1.zip</a></li>
<li><a href="049-091201-001-A-20093.zip">
049-091201-001-A-20093.zip</a></li>
<li><a href="049-091202-002-A-20093.1.zip">
049-091202-002-A-20093.1.zip</a></li>
<li><a href="049-091202-003-A-20060.zip">
049-091202-003-A-20060.zip</a></li>
<li><a href="049-091203-004-A-20049.1.zip">
049-091203-004-A-20049.1.zip</a></li>
<li><a href="049-091203-005-A-19991.1.zip">
049-091203-005-A-19991.1.zip</a></li>
<li><a href="pss_docs.zip"> pss_docs.zip</a></li>
</ul>
</body></html>


Resultado do Parser:

 Parent Directory
 01_ACQR_21376_DML.zip
 01_ACQR_PATCH_022010.2_DML.zip
 049-091126-029-A-20051.zip
 049-091126-029-A-20051_outdated.zip
 049-091126-030-A-20052.zip
 049-091126-030-A-20052_outdated.zip
 049-091126-031-A-20049.zip
 049-091130-032-A-19935.1.zip
 049-091201-001-A-20093.zip
 049-091202-002-A-20093.1.zip
 049-091202-003-A-20060.zip
 049-091203-004-A-20049.1.zip
 049-091203-005-A-19991.1.zip
 049-091203-006-A-19992.1.zip
 049-091203-007-A-20061.zip
 049-091204-008-A-PATCH-112009.zip
 049-091207-009-A-20146.zip
 049-091210-010-A-20110.zip
 049-091210-010-A-20110_outdated.zip
 049-091211-011-A-20163.zip
 049-091211-012-A-20228.zip
 049-091216-013-A-20299.zip
 049-091218-014-A-20294.zip
 049-091218-015-A-20312.zip
 049-091218-016-A-20315.zip
 049-091218-017-A-20316.zip
 049-091221-018-A-20309.zip
 049-091221-018-A-20309_outdated.zip
 049-091221-018-A-20309_outdated2.zip
 049-091221-018-A-20309_outdated3.zip

Agora preciso efetuar o download e não estou conseguindo.

Em 26 de agosto de 2010 16:45, breno <breno em rio.pm.org> escreveu:

> 2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>:
> > Galera fiz um projeto aqui e estou fazendo download de um zip file, só
> que
> > não estou conseguindo usando a lib, alguem pode me ajudar?
> >
>
> Você pode dar um exemplo do html que está fazendo parsing? Ou do
> conteúdo das variáveis em cada ponto crítico da execução? Ou o que seu
> programa deveria fazer mas não está fazendo? Ou alguma mensagem de
> erro?
>
> Baixar um zip com Perl pode ser tão simples quanto:
>
> perl -MLWP::Simple -e 'getprint
> q[http://strawberryperl.cload/5.12.1.0/strawberry-perl-5.12.1.0.zip]'
> > strawberry.zip
>
> []s
>
> -b
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/bbabb11d/attachment.html>

From andregarciacarneiro em gmail.com  Thu Aug 26 13:15:43 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Thu, 26 Aug 2010 17:15:43 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTintL7nf8wdHXSwHoKog41wgXCHQscNG31MT7PPV@mail.gmail.com>
References: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
	<AANLkTim9Of1mSBk8RnK=07KFWpA0MKXsV7Sk9jxXdeBV@mail.gmail.com>
	<AANLkTintL7nf8wdHXSwHoKog41wgXCHQscNG31MT7PPV@mail.gmail.com>
Message-ID: <AANLkTinee5TV6S6Q7b-xppE57D+UkVovjXrjXQYEnnYz@mail.gmail.com>

Considerando que vc já tem o parser funcionando, suponha que vc tem todos
esses links em objetos HTML::Element, e ele se chame @links

<code>
.
.
.

foreach my $l(@links){
    if(defined($l){
        my $url = $l->attr("href");
        eval{$mech_obj->get($url);};
        if($mech->success){
             my $filename = $url->as_text;
             my $f = undef;
             eval{open $f,'>',"/tmp/$filename";};
             if($!){
                    print "\n\nERRO AO CRIAR O ARQUIVO /tmp/$filename - $!";
                    #trate a exceção!!!
             }
             else{
                  binmode $f; #zip = arquivo binario, entao abra o arquivo
no modo binario.
                  print $f $mech->content;
              }
              close $f;
        }
    }
}


</code>



Cheers!

2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>

> O parsing funciona ja, mas posso sim... eu ja testei, fui fazendo por
> etapas, e já está funcionando
>
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
> <html>
>  <head>
>   <title>Index of /Getnet</title>
>  </head>
>  <body>
> <h1>Index of /Getnet</h1>
> <ul><li><a href="/"> Parent Directory</a></li>
> <li><a href="01_ACQR_21376_DML.zip"> 01_ACQR_21376_DML.zip</a></li>
> <li><a href="01_ACQR_PATCH_022010.2_DML.zip">
> 01_ACQR_PATCH_022010.2_DML.zip</a></li>
> <li><a href="049-091126-029-A-20051.zip">
> 049-091126-029-A-20051.zip</a></li>
> <li><a href="049-091126-029-A-20051_outdated.zip">
> 049-091126-029-A-20051_outdated.zip</a></li>
> <li><a href="049-091126-030-A-20052.zip">
> 049-091126-030-A-20052.zip</a></li>
> <li><a href="049-091126-030-A-20052_outdated.zip">
> 049-091126-030-A-20052_outdated.zip</a></li>
> <li><a href="049-091126-031-A-20049.zip">
> 049-091126-031-A-20049.zip</a></li>
> <li><a href="049-091130-032-A-19935.1.zip">
> 049-091130-032-A-19935.1.zip</a></li>
> <li><a href="049-091201-001-A-20093.zip">
> 049-091201-001-A-20093.zip</a></li>
> <li><a href="049-091202-002-A-20093.1.zip">
> 049-091202-002-A-20093.1.zip</a></li>
> <li><a href="049-091202-003-A-20060.zip">
> 049-091202-003-A-20060.zip</a></li>
> <li><a href="049-091203-004-A-20049.1.zip">
> 049-091203-004-A-20049.1.zip</a></li>
> <li><a href="049-091203-005-A-19991.1.zip">
> 049-091203-005-A-19991.1.zip</a></li>
> <li><a href="pss_docs.zip"> pss_docs.zip</a></li>
> </ul>
> </body></html>
>
>
> Resultado do Parser:
>
>  Parent Directory
>  01_ACQR_21376_DML.zip
>  01_ACQR_PATCH_022010.2_DML.zip
>  049-091126-029-A-20051.zip
>  049-091126-029-A-20051_outdated.zip
>  049-091126-030-A-20052.zip
>  049-091126-030-A-20052_outdated.zip
>  049-091126-031-A-20049.zip
>  049-091130-032-A-19935.1.zip
>  049-091201-001-A-20093.zip
>  049-091202-002-A-20093.1.zip
>  049-091202-003-A-20060.zip
>  049-091203-004-A-20049.1.zip
>  049-091203-005-A-19991.1.zip
>  049-091203-006-A-19992.1.zip
>  049-091203-007-A-20061.zip
>  049-091204-008-A-PATCH-112009.zip
>  049-091207-009-A-20146.zip
>  049-091210-010-A-20110.zip
>  049-091210-010-A-20110_outdated.zip
>  049-091211-011-A-20163.zip
>  049-091211-012-A-20228.zip
>  049-091216-013-A-20299.zip
>  049-091218-014-A-20294.zip
>  049-091218-015-A-20312.zip
>  049-091218-016-A-20315.zip
>  049-091218-017-A-20316.zip
>  049-091221-018-A-20309.zip
>  049-091221-018-A-20309_outdated.zip
>  049-091221-018-A-20309_outdated2.zip
>  049-091221-018-A-20309_outdated3.zip
>
> Agora preciso efetuar o download e não estou conseguindo.
>
> Em 26 de agosto de 2010 16:45, breno <breno em rio.pm.org> escreveu:
>
> 2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>:
>> > Galera fiz um projeto aqui e estou fazendo download de um zip file, só
>> que
>> > não estou conseguindo usando a lib, alguem pode me ajudar?
>> >
>>
>> Você pode dar um exemplo do html que está fazendo parsing? Ou do
>> conteúdo das variáveis em cada ponto crítico da execução? Ou o que seu
>> programa deveria fazer mas não está fazendo? Ou alguma mensagem de
>> erro?
>>
>> Baixar um zip com Perl pode ser tão simples quanto:
>>
>> perl -MLWP::Simple -e 'getprint
>> q[http://strawberryperl.cload/5.12.1.0/strawberry-perl-5.12.1.0.zip]'
>> > strawberry.zip
>>
>> []s
>>
>> -b
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/0cce7352/attachment-0001.html>

From elidmfranco em gmail.com  Thu Aug 26 13:36:40 2010
From: elidmfranco em gmail.com (eliane franco)
Date: Thu, 26 Aug 2010 17:36:40 -0300
Subject: [Cascavel-pm] Download Zip File
Message-ID: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>

olá Roan,

Poderia mostrar o erro apresentado e qual lib está dando errado?

[]'s
Eliane
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/e30b5eba/attachment.html>

From roanbrasil em gmail.com  Thu Aug 26 13:40:23 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Thu, 26 Aug 2010 17:40:23 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
References: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
Message-ID: <AANLkTikJjk2SMaw_TtbNBBSM0uPsYWXN55Q00KwzezsR@mail.gmail.com>

Oi Eliane,

A priori não há erro algum... a minha dúvida é...

Esqueçendo um pouco meu código, considerando que tenho um array
onde o conteudo é { "http://site.com.br/arquivo1.zip", "
http://site.com.te/arquivo2.zip" ,....,arquivoN.zip"}
Se uso esse método ele não salva no C:\\ o meyu arquiv, gostaria de saber
uma alternativa que funcionasse sem problemas, ele passa direto do código e
não resolve.

my $oQueue = Net::Download::Queue->new() or die;
              my $oDownload = $oQueue->oDownloadAdd(
            $complete_url,
              "C:\\",
              $variavel,
              ) or die;
        }

2010/8/26 eliane franco <elidmfranco em gmail.com>

>
> olá Roan,
>
> Poderia mostrar o erro apresentado e qual lib está dando errado?
>
> []'s
> Eliane
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/cd227129/attachment.html>

From andregarciacarneiro em gmail.com  Thu Aug 26 14:03:21 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Thu, 26 Aug 2010 18:03:21 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
References: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
Message-ID: <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH@mail.gmail.com>

Pra que vc tá usando MIME::Base64 junto com um decode_content...

Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra vc
usar MIME::Base64, fora o lance do password...


A sua requisição deveria ser algo do tipo


$mech->credentials($user,$passwd);
eval{ $mech->get('http://url_do_arquivo.zip')};
if($mech->success){
   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
TROCO EH BINARIO, ENTAO:
   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
OUTRO EVAL... MAS NAO USE DIE!!!!
   binmode $f; #SENAO VAI DAR ZEBRA...
   print $f $mech->content;
   close $f; #ACABOU...SO ISSO!
}
else{
     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
}





2010/8/26 eliane franco <elidmfranco em gmail.com>

>
> olá Roan,
>
> Poderia mostrar o erro apresentado e qual lib está dando errado?
>
> []'s
> Eliane
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment.html>

From andregarciacarneiro em gmail.com  Thu Aug 26 14:03:21 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Thu, 26 Aug 2010 18:03:21 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
References: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
Message-ID: <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH@mail.gmail.com>

Pra que vc tá usando MIME::Base64 junto com um decode_content...

Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra vc
usar MIME::Base64, fora o lance do password...


A sua requisição deveria ser algo do tipo


$mech->credentials($user,$passwd);
eval{ $mech->get('http://url_do_arquivo.zip')};
if($mech->success){
   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
TROCO EH BINARIO, ENTAO:
   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
OUTRO EVAL... MAS NAO USE DIE!!!!
   binmode $f; #SENAO VAI DAR ZEBRA...
   print $f $mech->content;
   close $f; #ACABOU...SO ISSO!
}
else{
     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
}





2010/8/26 eliane franco <elidmfranco em gmail.com>

>
> olá Roan,
>
> Poderia mostrar o erro apresentado e qual lib está dando errado?
>
> []'s
> Eliane
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0001.html>

From roanbrasil em gmail.com  Thu Aug 26 14:34:03 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Thu, 26 Aug 2010 18:34:03 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH@mail.gmail.com>
References: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
	<AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH@mail.gmail.com>
Message-ID: <AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R@mail.gmail.com>

André estou testando... realmente não tem motivo usar o Base64. \o/

2010/8/26 Andre Carneiro <andregarciacarneiro em gmail.com>

> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>
> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra vc
> usar MIME::Base64, fora o lance do password...
>
>
> A sua requisição deveria ser algo do tipo
>
>
> $mech->credentials($user,$passwd);
> eval{ $mech->get('http://url_do_arquivo.zip')};
> if($mech->success){
>    #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
> TROCO EH BINARIO, ENTAO:
>    open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
> OUTRO EVAL... MAS NAO USE DIE!!!!
>    binmode $f; #SENAO VAI DAR ZEBRA...
>    print $f $mech->content;
>    close $f; #ACABOU...SO ISSO!
> }
> else{
>      print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
> }
>
>
>
>
>
> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>
>>
>> olá Roan,
>>
>> Poderia mostrar o erro apresentado e qual lib está dando errado?
>>
>> []'s
>> Eliane
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/eae5f83a/attachment-0001.html>

From roanbrasil em gmail.com  Thu Aug 26 14:42:23 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Thu, 26 Aug 2010 18:42:23 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R@mail.gmail.com>
References: <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT@mail.gmail.com>
	<AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH@mail.gmail.com>
	<AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R@mail.gmail.com>
Message-ID: <AANLkTi=98n27wANhPiWtJvjKCzLh0LZWZ0arFj6JEcOX@mail.gmail.com>

Funcionou André... Obrigado \o/

CHEERSSSSSSSSSSSSSSSSSS

Em 26 de agosto de 2010 18:34, Roan Brasil Monteiro
<roanbrasil em gmail.com>escreveu:

> André estou testando... realmente não tem motivo usar o Base64. \o/
>
> 2010/8/26 Andre Carneiro <andregarciacarneiro em gmail.com>
>
> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>>
>> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra
>> vc usar MIME::Base64, fora o lance do password...
>>
>>
>> A sua requisição deveria ser algo do tipo
>>
>>
>> $mech->credentials($user,$passwd);
>> eval{ $mech->get('http://url_do_arquivo.zip')};
>> if($mech->success){
>>    #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> TROCO EH BINARIO, ENTAO:
>>    open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
>> OUTRO EVAL... MAS NAO USE DIE!!!!
>>    binmode $f; #SENAO VAI DAR ZEBRA...
>>    print $f $mech->content;
>>    close $f; #ACABOU...SO ISSO!
>> }
>> else{
>>      print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> }
>>
>>
>>
>>
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>>>
>>> olá Roan,
>>>
>>> Poderia mostrar o erro apresentado e qual lib está dando errado?
>>>
>>> []'s
>>> Eliane
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>


-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/a1b7d81d/attachment.html>

From elidmfranco em gmail.com  Thu Aug 26 20:00:09 2010
From: elidmfranco em gmail.com (eliane franco)
Date: Fri, 27 Aug 2010 00:00:09 -0300
Subject: [Cascavel-pm] Digest Cascavel-pm, volume 361, assunto 6
In-Reply-To: <mailman.13628.1282858449.2577.cascavel-pm@pm.org>
References: <mailman.13628.1282858449.2577.cascavel-pm@pm.org>
Message-ID: <AANLkTimyAkn+MmDnkxkfFHf=CFUsFMJLwMsfmU=qU=Qv@mail.gmail.com>

Olá Roan,

Desculpe se de alguma forma eu veja coisas simples, estou tentando te ajudar
a achar o raciocínio para o que deseja.
Vamos lá!

Vc já checou se o conteúdo dessa array tem exatamente o que vc espera?
(print array por exemplo)

Vc não pode usar serviço FTP? Net::FTP::Robust - download files over FTP

Quanto a função, veja :
oDownloadAdd($url, $dirDownload, $file, [$urlReferer =
""])<http://search.cpan.org/~johanl/Net-Download-Queue-0.04/lib/Net/Download/Queue.pm#___top>

Add $url to the queue, to be downloaded in $dirDownload/$file.

>>>>>#The url is now queued  <<<<<

# on another command line (you can have many of these)

download_queue --process

#Urls are downloades as they appear in the queue.


abraços,

Eliane




Em 26 de agosto de 2010 18:34, <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: Download Zip File (eliane franco)
>   2. Re: Download Zip File (Roan Brasil Monteiro)
>   3. Re: Download Zip File (Andre Carneiro)
>   4. Re: Download Zip File (Andre Carneiro)
>   5. Re: Download Zip File (Roan Brasil Monteiro)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Thu, 26 Aug 2010 17:36:40 -0300
> From: eliane franco <elidmfranco em gmail.com>
> Subject: Re: [Cascavel-pm] Download Zip File
> To: cascavel-pm em pm.org
> Message-ID:
>        <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT em mail.gmail.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> olá Roan,
>
> Poderia mostrar o erro apresentado e qual lib está dando errado?
>
> []'s
> Eliane
> -------------- Próxima Parte ----------
> Um anexo em HTML foi limpo...
> URL: <
> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/e30b5eba/attachment-0001.html
> >
>
> ------------------------------
>
> Message: 2
> Date: Thu, 26 Aug 2010 17:40:23 -0300
> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
> Subject: Re: [Cascavel-pm] Download Zip File
> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
> Message-ID:
>        <AANLkTikJjk2SMaw_TtbNBBSM0uPsYWXN55Q00KwzezsR em mail.gmail.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Oi Eliane,
>
> A priori não há erro algum... a minha dúvida é...
>
> Esqueçendo um pouco meu código, considerando que tenho um array
> onde o conteudo é { "http://site.com.br/arquivo1.zip", "
> http://site.com.te/arquivo2.zip" ,....,arquivoN.zip"}
> Se uso esse método ele não salva no C:\\ o meyu arquiv, gostaria de saber
> uma alternativa que funcionasse sem problemas, ele passa direto do código e
> não resolve.
>
> my $oQueue = Net::Download::Queue->new() or die;
>              my $oDownload = $oQueue->oDownloadAdd(
>            $complete_url,
>              "C:\\",
>              $variavel,
>              ) or die;
>        }
>
> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>
> >
> > olá Roan,
> >
> > Poderia mostrar o erro apresentado e qual lib está dando errado?
> >
> > []'s
> > Eliane
> >
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> -------------- Próxima Parte ----------
> Um anexo em HTML foi limpo...
> URL: <
> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/cd227129/attachment-0001.html
> >
>
> ------------------------------
>
> Message: 3
> Date: Thu, 26 Aug 2010 18:03:21 -0300
> From: Andre Carneiro <andregarciacarneiro em gmail.com>
> Subject: Re: [Cascavel-pm] Download Zip File
> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
> Message-ID:
>        <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
> >
> Content-Type: text/plain; charset="iso-8859-1"
>
> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>
> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra vc
> usar MIME::Base64, fora o lance do password...
>
>
> A sua requisição deveria ser algo do tipo
>
>
> $mech->credentials($user,$passwd);
> eval{ $mech->get('http://url_do_arquivo.zip')};
> if($mech->success){
>   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
> TROCO EH BINARIO, ENTAO:
>   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
> OUTRO EVAL... MAS NAO USE DIE!!!!
>   binmode $f; #SENAO VAI DAR ZEBRA...
>   print $f $mech->content;
>   close $f; #ACABOU...SO ISSO!
> }
> else{
>     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
> }
>
>
>
>
>
> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>
> >
> > olá Roan,
> >
> > Poderia mostrar o erro apresentado e qual lib está dando errado?
> >
> > []'s
> > Eliane
> >
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
> -------------- Próxima Parte ----------
> Um anexo em HTML foi limpo...
> URL: <
> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0002.html
> >
>
> ------------------------------
>
> Message: 4
> Date: Thu, 26 Aug 2010 18:03:21 -0300
> From: Andre Carneiro <andregarciacarneiro em gmail.com>
> Subject: Re: [Cascavel-pm] Download Zip File
> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
> Message-ID:
>        <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
> >
> Content-Type: text/plain; charset="iso-8859-1"
>
> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>
> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra vc
> usar MIME::Base64, fora o lance do password...
>
>
> A sua requisição deveria ser algo do tipo
>
>
> $mech->credentials($user,$passwd);
> eval{ $mech->get('http://url_do_arquivo.zip')};
> if($mech->success){
>   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
> TROCO EH BINARIO, ENTAO:
>   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
> OUTRO EVAL... MAS NAO USE DIE!!!!
>   binmode $f; #SENAO VAI DAR ZEBRA...
>   print $f $mech->content;
>   close $f; #ACABOU...SO ISSO!
> }
> else{
>     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
> }
>
>
>
>
>
> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>
> >
> > olá Roan,
> >
> > Poderia mostrar o erro apresentado e qual lib está dando errado?
> >
> > []'s
> > Eliane
> >
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
> -------------- Próxima Parte ----------
> Um anexo em HTML foi limpo...
> URL: <
> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0003.html
> >
>
> ------------------------------
>
> Message: 5
> Date: Thu, 26 Aug 2010 18:34:03 -0300
> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
> Subject: Re: [Cascavel-pm] Download Zip File
> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
> Message-ID:
>        <AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R em mail.gmail.com<K_ymZ6dKgY_CTiBUzcZGV9%2BR em mail.gmail.com>
> >
> Content-Type: text/plain; charset="iso-8859-1"
>
> André estou testando... realmente não tem motivo usar o Base64. \o/
>
> 2010/8/26 Andre Carneiro <andregarciacarneiro em gmail.com>
>
> > Pra que vc tá usando MIME::Base64 junto com um decode_content...
> >
> > Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra
> vc
> > usar MIME::Base64, fora o lance do password...
> >
> >
> > A sua requisição deveria ser algo do tipo
> >
> >
> > $mech->credentials($user,$passwd);
> > eval{ $mech->get('http://url_do_arquivo.zip')};
> > if($mech->success){
> >    #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
> > TROCO EH BINARIO, ENTAO:
> >    open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
> > OUTRO EVAL... MAS NAO USE DIE!!!!
> >    binmode $f; #SENAO VAI DAR ZEBRA...
> >    print $f $mech->content;
> >    close $f; #ACABOU...SO ISSO!
> > }
> > else{
> >      print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
> > }
> >
> >
> >
> >
> >
> > 2010/8/26 eliane franco <elidmfranco em gmail.com>
> >
> >>
> >> olá Roan,
> >>
> >> Poderia mostrar o erro apresentado e qual lib está dando errado?
> >>
> >> []'s
> >> Eliane
> >>
> >>
> >> _______________________________________________
> >> Cascavel-pm mailing list
> >> Cascavel-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >>
> >
> >
> >
> > --
> > André Garcia Carneiro
> > Analista/Desenvolvedor Perl
> > (11)82907780
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
> -------------- Próxima Parte ----------
> Um anexo em HTML foi limpo...
> URL: <
> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/eae5f83a/attachment.html
> >
>
> ------------------------------
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> Fim da Digest Cascavel-pm, volume 361, assunto 6
> ************************************************
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100827/2adf4228/attachment-0001.html>

From wendelscardua em gmail.com  Fri Aug 27 07:48:26 2010
From: wendelscardua em gmail.com (Wendel Scardua)
Date: Fri, 27 Aug 2010 11:48:26 -0300
Subject: [Cascavel-pm] Download Zip File
In-Reply-To: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
References: <AANLkTimfju3HihKGwOvHNZAExcqy3uqwKGWb6w1H28Py@mail.gmail.com>
Message-ID: <AANLkTinbLskUwhPVx2+cb5iSrWqJt2giifg53pZxM6oK@mail.gmail.com>

2010/8/26 Roan Brasil Monteiro <roanbrasil em gmail.com>

>
>             my $oQueue = Net::Download::Queue->new() or die;
>               my $oDownload = $oQueue->oDownloadAdd(
>             $complete_url,
>               "C:\\",
>               $variavel,
>               ) or die;
>



> Até mesmo se eu pegar um pagina qualquer para fazer o download por exemplo
> qualquer  URL.zip para eu testar.
>
>
Se eu entendi direito a documentação desse Net::Download::Queue, ele só
coloca o link numa fila de downloads, ele não faz o download. Você
precisaria rodar o(s) processador(es) em separado, o que deve ser útil se
quiser e puder baixar vários ao mesmo tempo.
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100827/40698d7e/attachment.html>

From roanbrasil em gmail.com  Mon Aug 30 15:14:36 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 30 Aug 2010 19:14:36 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
Message-ID: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>

Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de password,
pelo menos na documentação. Alguem sugere algo que tenha opção de
descomprimir quando o Zip tem senha, setando a senha?

-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100830/9b9a7d87/attachment.html>

From roanbrasil em gmail.com  Mon Aug 30 15:15:35 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 30 Aug 2010 19:15:35 -0300
Subject: [Cascavel-pm] Digest Cascavel-pm, volume 361, assunto 6
In-Reply-To: <AANLkTimyAkn+MmDnkxkfFHf=CFUsFMJLwMsfmU=qU=Qv@mail.gmail.com>
References: <mailman.13628.1282858449.2577.cascavel-pm@pm.org>
	<AANLkTimyAkn+MmDnkxkfFHf=CFUsFMJLwMsfmU=qU=Qv@mail.gmail.com>
Message-ID: <AANLkTi=eNEdCHpyeJG-mWhFqndeb3=uAbKct5q=tMWor@mail.gmail.com>

Elaine,

Obrigado, no caso do que o André sugeriu me ajudou, mas vou tentar ver se
esse teu jeito funciona também pois é mais uma forma de aprender.

Obrigado.

2010/8/27 eliane franco <elidmfranco em gmail.com>

> Olá Roan,
>
> Desculpe se de alguma forma eu veja coisas simples, estou tentando te
> ajudar a achar o raciocínio para o que deseja.
> Vamos lá!
>
> Vc já checou se o conteúdo dessa array tem exatamente o que vc espera?
> (print array por exemplo)
>
> Vc não pode usar serviço FTP? Net::FTP::Robust - download files over FTP
>
> Quanto a função, veja :
> oDownloadAdd($url, $dirDownload, $file, [$urlReferer = ""])<http://search.cpan.org/%7Ejohanl/Net-Download-Queue-0.04/lib/Net/Download/Queue.pm#___top>
>
> Add $url to the queue, to be downloaded in $dirDownload/$file.
>
> >>>>>#The url is now queued  <<<<<
>
> # on another command line (you can have many of these)
>
> download_queue --process
>
> #Urls are downloades as they appear in the queue.
>
>
> abraços,
>
> Eliane
>
>
>
>
> Em 26 de agosto de 2010 18:34, <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: Download Zip File (eliane franco)
>>   2. Re: Download Zip File (Roan Brasil Monteiro)
>>   3. Re: Download Zip File (Andre Carneiro)
>>   4. Re: Download Zip File (Andre Carneiro)
>>   5. Re: Download Zip File (Roan Brasil Monteiro)
>>
>>
>> ----------------------------------------------------------------------
>>
>> Message: 1
>> Date: Thu, 26 Aug 2010 17:36:40 -0300
>> From: eliane franco <elidmfranco em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: cascavel-pm em pm.org
>> Message-ID:
>>        <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT em mail.gmail.com>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> olá Roan,
>>
>> Poderia mostrar o erro apresentado e qual lib está dando errado?
>>
>> []'s
>> Eliane
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/e30b5eba/attachment-0001.html
>> >
>>
>> ------------------------------
>>
>> Message: 2
>> Date: Thu, 26 Aug 2010 17:40:23 -0300
>> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>>        <AANLkTikJjk2SMaw_TtbNBBSM0uPsYWXN55Q00KwzezsR em mail.gmail.com>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Oi Eliane,
>>
>> A priori não há erro algum... a minha dúvida é...
>>
>> Esqueçendo um pouco meu código, considerando que tenho um array
>> onde o conteudo é { "http://site.com.br/arquivo1.zip", "
>> http://site.com.te/arquivo2.zip" ,....,arquivoN.zip"}
>> Se uso esse método ele não salva no C:\\ o meyu arquiv, gostaria de saber
>> uma alternativa que funcionasse sem problemas, ele passa direto do código
>> e
>> não resolve.
>>
>> my $oQueue = Net::Download::Queue->new() or die;
>>              my $oDownload = $oQueue->oDownloadAdd(
>>            $complete_url,
>>              "C:\\",
>>              $variavel,
>>              ) or die;
>>        }
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/cd227129/attachment-0001.html
>> >
>>
>> ------------------------------
>>
>> Message: 3
>> Date: Thu, 26 Aug 2010 18:03:21 -0300
>> From: Andre Carneiro <andregarciacarneiro em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>>        <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>>
>> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> usar MIME::Base64, fora o lance do password...
>>
>>
>> A sua requisição deveria ser algo do tipo
>>
>>
>> $mech->credentials($user,$passwd);
>> eval{ $mech->get('http://url_do_arquivo.zip')};
>> if($mech->success){
>>   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> TROCO EH BINARIO, ENTAO:
>>   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
>> OUTRO EVAL... MAS NAO USE DIE!!!!
>>   binmode $f; #SENAO VAI DAR ZEBRA...
>>   print $f $mech->content;
>>   close $f; #ACABOU...SO ISSO!
>> }
>> else{
>>     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> }
>>
>>
>>
>>
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0002.html
>> >
>>
>> ------------------------------
>>
>> Message: 4
>> Date: Thu, 26 Aug 2010 18:03:21 -0300
>> From: Andre Carneiro <andregarciacarneiro em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>>        <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>>
>> Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> usar MIME::Base64, fora o lance do password...
>>
>>
>> A sua requisição deveria ser algo do tipo
>>
>>
>> $mech->credentials($user,$passwd);
>> eval{ $mech->get('http://url_do_arquivo.zip')};
>> if($mech->success){
>>   #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> TROCO EH BINARIO, ENTAO:
>>   open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
>> OUTRO EVAL... MAS NAO USE DIE!!!!
>>   binmode $f; #SENAO VAI DAR ZEBRA...
>>   print $f $mech->content;
>>   close $f; #ACABOU...SO ISSO!
>> }
>> else{
>>     print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> }
>>
>>
>>
>>
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0003.html
>> >
>>
>> ------------------------------
>>
>> Message: 5
>> Date: Thu, 26 Aug 2010 18:34:03 -0300
>> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>>        <AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R em mail.gmail.com<K_ymZ6dKgY_CTiBUzcZGV9%2BR em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> André estou testando... realmente não tem motivo usar o Base64. \o/
>>
>> 2010/8/26 Andre Carneiro <andregarciacarneiro em gmail.com>
>>
>> > Pra que vc tá usando MIME::Base64 junto com um decode_content...
>> >
>> > Se a sua url é http  e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> > usar MIME::Base64, fora o lance do password...
>> >
>> >
>> > A sua requisição deveria ser algo do tipo
>> >
>> >
>> > $mech->credentials($user,$passwd);
>> > eval{ $mech->get('http://url_do_arquivo.zip')};
>> > if($mech->success){
>> >    #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> > TROCO EH BINARIO, ENTAO:
>> >    open my $f,'>','/tmp/arquivosalvo.zip' or die $!;  #PREGUICA DE FAZER
>> > OUTRO EVAL... MAS NAO USE DIE!!!!
>> >    binmode $f; #SENAO VAI DAR ZEBRA...
>> >    print $f $mech->content;
>> >    close $f; #ACABOU...SO ISSO!
>> > }
>> > else{
>> >      print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> > }
>> >
>> >
>> >
>> >
>> >
>> > 2010/8/26 eliane franco <elidmfranco em gmail.com>
>> >
>> >>
>> >> olá Roan,
>> >>
>> >> Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >>
>> >> []'s
>> >> Eliane
>> >>
>> >>
>> >> _______________________________________________
>> >> Cascavel-pm mailing list
>> >> Cascavel-pm em pm.org
>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>
>> >
>> >
>> >
>> > --
>> > André Garcia Carneiro
>> > Analista/Desenvolvedor Perl
>> > (11)82907780
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/eae5f83a/attachment.html
>> >
>>
>> ------------------------------
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>> Fim da Digest Cascavel-pm, volume 361, assunto 6
>> ************************************************
>>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100830/01c88fbe/attachment-0001.html>

From andregarciacarneiro em gmail.com  Mon Aug 30 15:25:25 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Mon, 30 Aug 2010 19:25:25 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
Message-ID: <AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>

Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então é
provavel que não tenha problema.

http://www.chilkatsoft.com/perl-zip.asp



2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>

> Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
> descomprimir quando o Zip tem senha, setando a senha?
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100830/0640626e/attachment.html>

From roanbrasil em gmail.com  Mon Aug 30 15:32:18 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Mon, 30 Aug 2010 19:32:18 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
Message-ID: <AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>

É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
desenvolvimento é Ruindows...

2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>

> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então é
> provavel que não tenha problema.
>
> http://www.chilkatsoft.com/perl-zip.asp
>
>
>
> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>> descomprimir quando o Zip tem senha, setando a senha?
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100830/a097c9d6/attachment.html>

From andregarciacarneiro em gmail.com  Tue Aug 31 05:12:47 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Tue, 31 Aug 2010 09:12:47 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
Message-ID: <AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>

Humm... achei q vc desenvolvesse para windows...  :(



2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>

> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
> desenvolvimento é Ruindows...
>
> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>
> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então é
>> provavel que não tenha problema.
>>
>> http://www.chilkatsoft.com/perl-zip.asp
>>
>>
>>
>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>
>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>> descomprimir quando o Zip tem senha, setando a senha?
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> http://roanbrasil.wordpress.com/
>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100831/eb093827/attachment.html>

From roanbrasil em gmail.com  Tue Aug 31 05:13:24 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Tue, 31 Aug 2010 09:13:24 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
Message-ID: <AANLkTikeJe8b=mg1XSDqX5_mjBSDwgf43pXOe6M9QC-n@mail.gmail.com>

e além disso quero utilizar de forma generica...

Em 30 de agosto de 2010 19:32, Roan Brasil Monteiro
<roanbrasil em gmail.com>escreveu:

> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
> desenvolvimento é Ruindows...
>
> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>
> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então é
>> provavel que não tenha problema.
>>
>> http://www.chilkatsoft.com/perl-zip.asp
>>
>>
>>
>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>
>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>> descomprimir quando o Zip tem senha, setando a senha?
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> http://roanbrasil.wordpress.com/
>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>


-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100831/fabd854f/attachment-0001.html>

From roanbrasil em gmail.com  Tue Aug 31 05:14:13 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Tue, 31 Aug 2010 09:14:13 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
	<AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
Message-ID: <AANLkTikJxiSDzB5DHksYpf_gUTRT7M4qpa8FgWG0oahB@mail.gmail.com>

Desenvolvo em Windows mas para Linux/Unix pois os servers são assim, uso
Strawberry que é o que se aproxima mais do Linux...

2010/8/31 Andre Carneiro <andregarciacarneiro em gmail.com>

> Humm... achei q vc desenvolvesse para windows...  :(
>
>
>
> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
>> desenvolvimento é Ruindows...
>>
>> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>>
>> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então
>>> é provavel que não tenha problema.
>>>
>>> http://www.chilkatsoft.com/perl-zip.asp
>>>
>>>
>>>
>>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>
>>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>>> descomprimir quando o Zip tem senha, setando a senha?
>>>>
>>>> --
>>>> Atenciosamente,
>>>>
>>>> Roan Brasil Monteiro
>>>> http://roanbrasil.wordpress.com/
>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>
>>>>
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>
>>>
>>>
>>>
>>> --
>>> André Garcia Carneiro
>>> Analista/Desenvolvedor Perl
>>> (11)82907780
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100831/50d0ba5e/attachment.html>

From andregarciacarneiro em gmail.com  Tue Aug 31 05:20:39 2010
From: andregarciacarneiro em gmail.com (Andre Carneiro)
Date: Tue, 31 Aug 2010 09:20:39 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
	<AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
Message-ID: <AANLkTinu3475DRUHm=4S1C319yMAG5yTxjWgQuD-WfeF@mail.gmail.com>

Bom, eu não encontrei nenhum módulo que faça isso, então já estou apelando.
Se alguém tiver uma sugestão melhor, fiquem a vontade...


unzip -L -P $password -n $zipfile  -d $outputdir

Você pode tratar isso de maneira que fique genérico, organizando isso dentro
de um módulo.

Se ficar bom, poderia até publicar...


Cheers!

Em 31 de agosto de 2010 09:12, Andre Carneiro <andregarciacarneiro em gmail.com
> escreveu:

> Humm... achei q vc desenvolvesse para windows...  :(
>
>
>
> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>
>> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
>> desenvolvimento é Ruindows...
>>
>> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>>
>> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então
>>> é provavel que não tenha problema.
>>>
>>> http://www.chilkatsoft.com/perl-zip.asp
>>>
>>>
>>>
>>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>
>>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>>> descomprimir quando o Zip tem senha, setando a senha?
>>>>
>>>> --
>>>> Atenciosamente,
>>>>
>>>> Roan Brasil Monteiro
>>>> http://roanbrasil.wordpress.com/
>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>
>>>>
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>
>>>
>>>
>>>
>>> --
>>> André Garcia Carneiro
>>> Analista/Desenvolvedor Perl
>>> (11)82907780
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100831/214f7f2d/attachment.html>

From roanbrasil em gmail.com  Tue Aug 31 05:57:29 2010
From: roanbrasil em gmail.com (Roan Brasil Monteiro)
Date: Tue, 31 Aug 2010 09:57:29 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTinu3475DRUHm=4S1C319yMAG5yTxjWgQuD-WfeF@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
	<AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
	<AANLkTinu3475DRUHm=4S1C319yMAG5yTxjWgQuD-WfeF@mail.gmail.com>
Message-ID: <AANLkTimDqDonhBR+C8v7uZ=APcFi_oXB02QivdUdofhj@mail.gmail.com>

Opa André,

eu tentei isso mas olha o que acontece...


Archive:  C:/Temp/049-100827-024-A-24269.zip
   skipping: arquivo.pdf  need PK compat. v5.1 (can do v2.1)

:S

2010/8/31 Andre Carneiro <andregarciacarneiro em gmail.com>

> Bom, eu não encontrei nenhum módulo que faça isso, então já estou apelando.
> Se alguém tiver uma sugestão melhor, fiquem a vontade...
>
>
> unzip -L -P $password -n $zipfile  -d $outputdir
>
> Você pode tratar isso de maneira que fique genérico, organizando isso
> dentro de um módulo.
>
> Se ficar bom, poderia até publicar...
>
>
> Cheers!
>
> Em 31 de agosto de 2010 09:12, Andre Carneiro <
> andregarciacarneiro em gmail.com> escreveu:
>
> Humm... achei q vc desenvolvesse para windows...  :(
>>
>>
>>
>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>
>>> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
>>> desenvolvimento é Ruindows...
>>>
>>> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>>>
>>> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows, então
>>>> é provavel que não tenha problema.
>>>>
>>>> http://www.chilkatsoft.com/perl-zip.asp
>>>>
>>>>
>>>>
>>>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>>
>>>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>>>> descomprimir quando o Zip tem senha, setando a senha?
>>>>>
>>>>> --
>>>>> Atenciosamente,
>>>>>
>>>>> Roan Brasil Monteiro
>>>>> http://roanbrasil.wordpress.com/
>>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>>
>>>>>
>>>>> _______________________________________________
>>>>> Cascavel-pm mailing list
>>>>> Cascavel-pm em pm.org
>>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>>
>>>>
>>>>
>>>>
>>>> --
>>>> André Garcia Carneiro
>>>> Analista/Desenvolvedor Perl
>>>> (11)82907780
>>>>
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>
>>>
>>>
>>>
>>> --
>>> Atenciosamente,
>>>
>>> Roan Brasil Monteiro
>>> http://roanbrasil.wordpress.com/
>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>>
>
>
>
> --
> André Garcia Carneiro
> Analista/Desenvolvedor Perl
> (11)82907780
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Atenciosamente,

Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100831/0d2f3734/attachment-0001.html>

From felipe.vinturini em gmail.com  Tue Aug 31 06:02:56 2010
From: felipe.vinturini em gmail.com (Felipe Vinturini)
Date: Tue, 31 Aug 2010 10:02:56 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Descompress=E3o_ZIP_File_com_Passwor?=
	=?iso-8859-1?q?d?=
In-Reply-To: <AANLkTimDqDonhBR+C8v7uZ=APcFi_oXB02QivdUdofhj@mail.gmail.com>
References: <AANLkTind3Ox3awnezLD2cwmML6m5XCuy8UEqzwpjV1GB@mail.gmail.com>
	<AANLkTi=C52hTwG8GUk1WsKnvSx_qPmkjJEg5cwcggkx1@mail.gmail.com>
	<AANLkTimPp3ueT=fj5OEKpmq4wwu21sn1vJRLfhRe1uV0@mail.gmail.com>
	<AANLkTi=saqdEtiB1dNR2rcTUeoyfqH3rLY-8OtGKnb5h@mail.gmail.com>
	<AANLkTinu3475DRUHm=4S1C319yMAG5yTxjWgQuD-WfeF@mail.gmail.com>
	<AANLkTimDqDonhBR+C8v7uZ=APcFi_oXB02QivdUdofhj@mail.gmail.com>
Message-ID: <AANLkTik185Hm7TYr=2y86a0z3TSVBtws3eat40Z9A+4g@mail.gmail.com>

Procure no link: "Giga Unzipping" - http://linuxgazette.net/118/lg_tips.html

Ele aponta para o software: http://sourceforge.net/projects/p7zip/files/, só
que é necessário compilar para o Windows.

Felipe.

2010/8/31 Roan Brasil Monteiro <roanbrasil em gmail.com>

> Opa André,
>
> eu tentei isso mas olha o que acontece...
>
>
> Archive:  C:/Temp/049-100827-024-A-24269.zip
>    skipping: arquivo.pdf  need PK compat. v5.1 (can do v2.1)
>
> :S
>
> 2010/8/31 Andre Carneiro <andregarciacarneiro em gmail.com>
>
> Bom, eu não encontrei nenhum módulo que faça isso, então já estou apelando.
>> Se alguém tiver uma sugestão melhor, fiquem a vontade...
>>
>>
>> unzip -L -P $password -n $zipfile  -d $outputdir
>>
>> Você pode tratar isso de maneira que fique genérico, organizando isso
>> dentro de um módulo.
>>
>> Se ficar bom, poderia até publicar...
>>
>>
>> Cheers!
>>
>> Em 31 de agosto de 2010 09:12, Andre Carneiro <
>> andregarciacarneiro em gmail.com> escreveu:
>>
>> Humm... achei q vc desenvolvesse para windows...  :(
>>>
>>>
>>>
>>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>
>>>> É mas meu programa vai rodar Linux ou Unix :(, meu ambiente de
>>>> desenvolvimento é Ruindows...
>>>>
>>>> 2010/8/30 Andre Carneiro <andregarciacarneiro em gmail.com>
>>>>
>>>> Achei esse treco aqui. Como eu sei que você tá em ambiente Windows,
>>>>> então é provavel que não tenha problema.
>>>>>
>>>>> http://www.chilkatsoft.com/perl-zip.asp
>>>>>
>>>>>
>>>>>
>>>>> 2010/8/30 Roan Brasil Monteiro <roanbrasil em gmail.com>
>>>>>
>>>>>>  Bom eu tava vendo o Archive::Zip e pelo que vi não existe opção de
>>>>>> password, pelo menos na documentação. Alguem sugere algo que tenha opção de
>>>>>> descomprimir quando o Zip tem senha, setando a senha?
>>>>>>
>>>>>> --
>>>>>> Atenciosamente,
>>>>>>
>>>>>> Roan Brasil Monteiro
>>>>>> http://roanbrasil.wordpress.com/
>>>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>>>
>>>>>>
>>>>>> _______________________________________________
>>>>>> Cascavel-pm mailing list
>>>>>> Cascavel-pm em pm.org
>>>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>>>
>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> André Garcia Carneiro
>>>>> Analista/Desenvolvedor Perl
>>>>> (11)82907780
>>>>>
>>>>> _______________________________________________
>>>>> Cascavel-pm mailing list
>>>>> Cascavel-pm em pm.org
>>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>>
>>>>
>>>>
>>>>
>>>> --
>>>> Atenciosamente,
>>>>
>>>> Roan Brasil Monteiro
>>>> http://roanbrasil.wordpress.com/
>>>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>>>>
>>>>
>>>> _______________________________________________
>>>> Cascavel-pm mailing list
>>>> Cascavel-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>>
>>>
>>>
>>>
>>> --
>>> André Garcia Carneiro
>>> Analista/Desenvolvedor Perl
>>> (11)82907780
>>>
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Atenciosamente,
>
> Roan Brasil Monteiro
> http://roanbrasil.wordpress.com/
> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>
>
> _______________________________________________
> 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/20100831/6df02af7/attachment.html>