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="gmail_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="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;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" target="_blank">SaoPaulo-pm@pm.org</a><br>
L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/<u></u>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>