[SP-pm] Selecionar texto após uma determinada linha em um arquivo

["Flávio R. Lopes"]

Deixar eu explicar melhor.
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?

On 26-06-2011 21:19, "Flávio R. Lopes" wrote:
> Olá Renato!
> 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.
> Dá para fazer isto?
>
> On 26-06-2011 20:56, Renato Santos wrote:
>> 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:
>>
>> $encontrou = 0;
>> $texto = '';
>> open(.., '<', ..);
>> while( <..>) {
>>    ???
>>     if ($_ =~ /algumaregexpr/ ) {
>>         $encontrou = 1;
>>     }
>>     if ($encontrou){
>>       $text .= $_;
>>    }
>> }
>>
>> $textoAteoFinal = $texto;
>>
>>
>> Têm muitas formas, mas está é a mais clara.
>>
>> 2011/6/26 "Flávio R. Lopes" <flavio.lopes em links.inf.br 
>> <mailto:flavio.lopes em links.inf.br>>
>>
>>     Olá pessoal!
>>     Há alguns dias venho brigando com um  script, onde gostaria que
>>     este script me ajudasse a selecionar algumas linhas de um arquivo
>>     de texto.
>>     Preciso selecionar, à partir da ocorrência de uma determinada
>>     string, todo o texto até o final do arquivo.
>>
>>     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?
>>
>>     abraço,
>>     Flávio
>>
>>
>>     =begin disclaimer
>>      Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>>     SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>>     <mailto:SaoPaulo-pm em pm.org>
>>     L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>>     =end disclaimer
>>
>>
>>
>>
>> -- 
>> Renato Santos
>> http://www.renatocron.com/blog/
>>
>>
>> =begin disclaimer
>>     Sao Paulo Perl Mongers:http://sao-paulo.pm.org/
>>   SaoPaulo-pm mailing list:SaoPaulo-pm em pm.org
>>   L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>> =end disclaimer
>>    
>
>
> =begin disclaimer
>     Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>   SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>   L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>    

-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110626/d25a74f8/attachment.html>