<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style>
</head>
<body class='hmmessage'><div dir='ltr'>
Gostaria de ti mostrar uma outra solução usando expressões regulares.<br><br>$\ = "_EOF_";<br>open(LE, arquivo);<br>$conteudo = <LE>;<br>close LE;<br>$conteudo =~ s/.*?texto/texto/si;<br><br>Pronto, você terá todo conteúdo do texto para frente.<br><br>Att,<br>  Felipe Silva<br><br><div>From: saopaulo-pm-request@pm.org<br>Subject: SaoPaulo-pm Digest, Vol 81, Issue 79<br>To: saopaulo-pm@pm.org<br>Date: Sun, 26 Jun 2011 18:05:43 -0700<br><br><pre>Send SaoPaulo-pm mailing list submissions to<br>     saopaulo-pm@pm.org<br> <br>To subscribe or unsubscribe via the World Wide Web, visit<br>      <a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>or, via email, send a message with subject or body 'help' to<br>   saopaulo-pm-request@pm.org<br> <br>You can reach the person managing the list at<br>  saopaulo-pm-owner@pm.org<br> <br>When replying, please edit your Subject line so it is more specific<br>than "Re: Contents of SaoPaulo-pm digest..."<br></pre><br><br>--Anexo de Mensagem Encaminhado--<br>From: gustavo.telly@gmail.com<br>To: saopaulo-pm@mail.pm.org<br>Date: Sun, 26 Jun 2011 21:56:14 -0300<br>Subject: Re: [SP-pm]    Selecionar texto após uma determinada linha em um arquivo<br><br>acredito que a primeira solução do Renato me parece ser exatamente oque você precisa Flávio,<div>Se voce quise fazer pelo número da linha, acho que vai ficar mais complicado, por que você vai ter que colocar mais coisas no seu algoritmo(segundo exemplo do Renato).</div>
<div><br></div><div>E por cima mesmo, os 2 realizam a mesma coisa, de jeito diferente, mas acho que pra sua necessidade os primeiro é mais tranquilo :)</div><div><br></div><div>Você pode deixa-lo assim:</div><div><br></div>
<div><span class="ecxApple-style-span" style="border-collapse: collapse; font-family: arial,sans-serif; font-size: 13px;"><div>$encontrou = 0;</div><div>$texto = '';</div><div>open(.., '<', ..);</div><div>
while( <..>) {</div><div>   ??? </div><div>    if ($_ =~ /algumaregexpr/ ) {</div><div>        $encontrou = 1;</div><div>    }</div><div>   while ($encontrou && !eof()){ #só mudar aqui para ele ir concatenando o valor até o fim do arquivo.</div>
<div>      $text .= $_;</div><div>   }</div><div>}</div><div><br></div><div>$textoAteoFinal = $texto;</div></span></div><div><br><br><div class="ecxgmail_quote">2011/6/26 Renato Santos <span dir="ltr"><<a href="mailto:renato.cron@gmail.com">renato.cron@gmail.com</a>></span><br>
<blockquote class="ecxgmail_quote" style="border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;"><div>Toda a lógica para abrir o arquivo com perl está aqui:</div><a href="http://sao-paulo.pm.org/artigo/2010/analisedastecnicasparaabrirelerarquivos" target="_blank">http://sao-paulo.pm.org/artigo/2010/analisedastecnicasparaabrirelerarquivos</a><div>


<br></div><div>Toda lógica para fazer o que você quer está aqui:</div><div><br></div><div>vars </div><div>   a: texto</div><div>   b: numero</div><div><br></div><div>a esta vazio</div><div>b é indefinido</div><div><br></div>


<div>abrir arquivo</div><div>enquanto (ler(arquvio)) repita</div><div><br></div><div>   se (linha-atual tem a ocorrencia) entao</div><div>      b têm o valor da linha atual</div><div>   fim-se</div><div><br></div><div>   se (b estiver definido) entao</div>


<div>      a = a + linha</div><div>   fim-se</div><div>fim-enquanto</div><div><br></div><div>todo o valor de "a" neste ponto será o texto entre texto encontrado até final do arquivo.</div><div><div></div><div class="h5">
<div><br></div><div><br>

<div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br><blockquote class="ecxgmail_quote" style="border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">


<u></u>


  

<div>
Putz, desculpe! Escrevi errado!<br>
Supondo que a o número da linha onde há a ocorrência seja a linha 100,
como poderia fazer então para copiar da linha 100 até o final do
arquivo?<div><div></div><div><br>
<br>
On 26-06-2011 21:28, Gustavo Telly wrote:
<blockquote>pq da linha 50 se a ocorrência está na 100 ???
  <div><br>
  </div>
  <div>não entendi muito bem....</div>
  <div><br>
  </div>
  <div>[]'s<br>
  <br>
  <div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
  <blockquote class="ecxgmail_quote" style="padding-left: 1ex;">
    <div>
Deixar eu explicar melhor.<br>
Supondo que o número da linha onde há a ocorrência da palavra seja a
linha número 100. Como eu faria para copiar/selecionar da linha 50 até
o final do arquivo?
    <div>
    <div><br>
    <br>
On 26-06-2011 21:19, "Flávio R. Lopes" wrote:
    <blockquote> Olá Renato!<br>
Então, estive pensando também na seguinte hipótese: Eu tenho como obter
o número da linha onde está a primera ocorrência do valor. Então à
partir disto, eu copiaria desta linha até o final do arquivo.<br>
Dá para fazer isto?<br>
      <br>
On 26-06-2011 20:56, Renato Santos wrote:
      <blockquote>vc pode criar uma variavel que tera o
valor falso antes do
loop do arquivo, e mais uma vazia, e quando encontar o texto que está
procurando, jogue o troque o valor da variavel para outro, e depois
verifique se o valor é o .. ah, que saber:
        <div><br>
        </div>
        <div>$encontrou = 0;</div>
        <div>$texto = '';</div>
        <div>open(.., '<', ..);</div>
        <div>while( <..>) {</div>
        <div>   ??? </div>
        <div>    if ($_ =~ /algumaregexpr/ ) {</div>
        <div>        $encontrou = 1;</div>
        <div>    }</div>
        <div>    if ($encontrou){</div>
        <div>      $text .= $_;</div>
        <div>   }</div>
        <div>}</div>
        <div><br>
        </div>
        <div>$textoAteoFinal = $texto;</div>
        <div><br>
        </div>
        <div><br>
Têm muitas formas, mas está é a mais clara.</div>
        <div><br>
        </div>
        <div>
        <div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
        <blockquote class="ecxgmail_quote" style="padding-left: 1ex;">Olá
pessoal!<br>
Há alguns dias venho brigando com um  script, onde gostaria que este
script me ajudasse a selecionar algumas linhas de um arquivo de texto.<br>
Preciso selecionar, à partir da ocorrência de uma determinada string,
todo o texto até o final do arquivo.<br>
          <br>
Supondo que eu tenha uma linha que inicie com "26-06-2011", como
poderia fazer a regex para copiar todo o texto desta linha até o final
do arquivo, inclusive esta linha?<br>
          <br>
abraço,<br>
Flávio<br>
          <br>
          <br>
=begin disclaimer<br>
 Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
        </blockquote>
        </div>
        <br>
        <br clear="all">
        <br>
-- <br>
Renato Santos<br>
        <a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a><br>
        </div>
        <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
      </blockquote>
      <br>
      <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
    </blockquote>
    <br>
    </div>
    </div>
    </div>
    <br>
=begin disclaimer<br>
  Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
    <br>
  </blockquote>
  </div>
  <br>
  </div>
  <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
</blockquote>
<br>
</div></div></div>

<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><br>-- <br>Renato Santos<br><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a><br>
</div>
</div></div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br></div>
<br><br>--Anexo de Mensagem Encaminhado--<br>From: renato.cron@gmail.com<br>To: saopaulo-pm@mail.pm.org<br>Date: Sun, 26 Jun 2011 22:05:14 -0300<br>Subject: Re: [SP-pm]    Selecionar texto após uma determinada linha em um arquivo<br><br>Hmm<div>Abrindo um segundo loop dentro do loop [tericamente] gastaria mais processo que analisar se a linha atual bate ou não [e ainda pode ser verificado antes...]</div><div>mas,</div><div>se o intuito for performance, e o texto não for grande [menos de 1mb] podemos fazer um slurp e jogar tudo numa msema linha e bater uma simples expressão:</div>

<div><br></div><div><br></div><div><font class="ecxApple-style-span" face="'courier new', monospace">$arquivointeiro <span class="ecxApple-style-span" style="font-size: 14px; white-space: pre;">= do { local ( @ARGV, $/ ) = $file; <> };</span></font></div>

<div><font class="ecxApple-style-span" face="'courier new', monospace">$procura = qr 'o que vc ta procurando';</font></div><div><font class="ecxApple-style-span" face="'courier new', monospace"><br></font></div>

<div><font class="ecxApple-style-span" face="'courier new', monospace">my ($ateofinal) = $arquivointeiro =~  /($procura.+)/;</font></div><div><br><br><div class="ecxgmail_quote">2011/6/26 Gustavo Telly <span dir="ltr"><<a href="mailto:gustavo.telly@gmail.com">gustavo.telly@gmail.com</a>></span><br>

<blockquote class="ecxgmail_quote" style="border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">acredito que a primeira solução do Renato me parece ser exatamente oque você precisa Flávio,<div>Se voce quise fazer pelo número da linha, acho que vai ficar mais complicado, por que você vai ter que colocar mais coisas no seu algoritmo(segundo exemplo do Renato).</div>


<div><br></div><div>E por cima mesmo, os 2 realizam a mesma coisa, de jeito diferente, mas acho que pra sua necessidade os primeiro é mais tranquilo :)</div><div><br></div><div>Você pode deixa-lo assim:</div><div><br></div>


<div><span style="border-collapse: collapse; font-family: arial,sans-serif; font-size: 13px;"><div class="ecxim"><div>$encontrou = 0;</div><div>$texto = '';</div><div>open(.., '<', ..);</div><div>
while( <..>) {</div><div>   ??? </div><div>    if ($_ =~ /algumaregexpr/ ) {</div><div>        $encontrou = 1;</div><div>    }</div></div><div>   while ($encontrou && !eof()){ #só mudar aqui para ele ir concatenando o valor até o fim do arquivo.</div>


<div>      $text .= $_;</div><div>   }</div><div>}</div><div><br></div><div>$textoAteoFinal = $texto;</div></span></div><div><div></div><div class="h5"><div><br><br><div class="ecxgmail_quote">2011/6/26 Renato Santos <span dir="ltr"><<a href="mailto:renato.cron@gmail.com">renato.cron@gmail.com</a>></span><br>


<blockquote class="ecxgmail_quote" style="border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;"><div>Toda a lógica para abrir o arquivo com perl está aqui:</div><a href="http://sao-paulo.pm.org/artigo/2010/analisedastecnicasparaabrirelerarquivos" target="_blank">http://sao-paulo.pm.org/artigo/2010/analisedastecnicasparaabrirelerarquivos</a><div>




<br></div><div>Toda lógica para fazer o que você quer está aqui:</div><div><br></div><div>vars </div><div>   a: texto</div><div>   b: numero</div><div><br></div><div>a esta vazio</div><div>b é indefinido</div><div><br></div>




<div>abrir arquivo</div><div>enquanto (ler(arquvio)) repita</div><div><br></div><div>   se (linha-atual tem a ocorrencia) entao</div><div>      b têm o valor da linha atual</div><div>   fim-se</div><div><br></div><div>   se (b estiver definido) entao</div>




<div>      a = a + linha</div><div>   fim-se</div><div>fim-enquanto</div><div><br></div><div>todo o valor de "a" neste ponto será o texto entre texto encontrado até final do arquivo.</div><div><div></div><div>
<div><br></div><div><br>

<div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br><blockquote class="ecxgmail_quote" style="border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">




<u></u>


  

<div>
Putz, desculpe! Escrevi errado!<br>
Supondo que a o número da linha onde há a ocorrência seja a linha 100,
como poderia fazer então para copiar da linha 100 até o final do
arquivo?<div><div></div><div><br>
<br>
On 26-06-2011 21:28, Gustavo Telly wrote:
<blockquote>pq da linha 50 se a ocorrência está na 100 ???
  <div><br>
  </div>
  <div>não entendi muito bem....</div>
  <div><br>
  </div>
  <div>[]'s<br>
  <br>
  <div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
  <blockquote class="ecxgmail_quote" style="padding-left: 1ex;">
    <div>
Deixar eu explicar melhor.<br>
Supondo que o número da linha onde há a ocorrência da palavra seja a
linha número 100. Como eu faria para copiar/selecionar da linha 50 até
o final do arquivo?
    <div>
    <div><br>
    <br>
On 26-06-2011 21:19, "Flávio R. Lopes" wrote:
    <blockquote> Olá Renato!<br>
Então, estive pensando também na seguinte hipótese: Eu tenho como obter
o número da linha onde está a primera ocorrência do valor. Então à
partir disto, eu copiaria desta linha até o final do arquivo.<br>
Dá para fazer isto?<br>
      <br>
On 26-06-2011 20:56, Renato Santos wrote:
      <blockquote>vc pode criar uma variavel que tera o
valor falso antes do
loop do arquivo, e mais uma vazia, e quando encontar o texto que está
procurando, jogue o troque o valor da variavel para outro, e depois
verifique se o valor é o .. ah, que saber:
        <div><br>
        </div>
        <div>$encontrou = 0;</div>
        <div>$texto = '';</div>
        <div>open(.., '<', ..);</div>
        <div>while( <..>) {</div>
        <div>   ??? </div>
        <div>    if ($_ =~ /algumaregexpr/ ) {</div>
        <div>        $encontrou = 1;</div>
        <div>    }</div>
        <div>    if ($encontrou){</div>
        <div>      $text .= $_;</div>
        <div>   }</div>
        <div>}</div>
        <div><br>
        </div>
        <div>$textoAteoFinal = $texto;</div>
        <div><br>
        </div>
        <div><br>
Têm muitas formas, mas está é a mais clara.</div>
        <div><br>
        </div>
        <div>
        <div class="ecxgmail_quote">2011/6/26 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
        <blockquote class="ecxgmail_quote" style="padding-left: 1ex;">Olá
pessoal!<br>
Há alguns dias venho brigando com um  script, onde gostaria que este
script me ajudasse a selecionar algumas linhas de um arquivo de texto.<br>
Preciso selecionar, à partir da ocorrência de uma determinada string,
todo o texto até o final do arquivo.<br>
          <br>
Supondo que eu tenha uma linha que inicie com "26-06-2011", como
poderia fazer a regex para copiar todo o texto desta linha até o final
do arquivo, inclusive esta linha?<br>
          <br>
abraço,<br>
Flávio<br>
          <br>
          <br>
=begin disclaimer<br>
 Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
        </blockquote>
        </div>
        <br>
        <br clear="all">
        <br>
-- <br>
Renato Santos<br>
        <a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a><br>
        </div>
        <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
      </blockquote>
      <br>
      <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
    </blockquote>
    <br>
    </div>
    </div>
    </div>
    <br>
=begin disclaimer<br>
  Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
    <br>
  </blockquote>
  </div>
  <br>
  </div>
  <pre><fieldset></fieldset>
=begin disclaimer
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer
  </pre>
</blockquote>
<br>
</div></div></div>

<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><br>-- <br>Renato Santos<br><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a><br>
</div>
</div></div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br></div>
</div></div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><br>-- <br>Renato Santos<br><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a><br>
</div></div>                                          </div></body>
</html>