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

[Gustavo Telly]

pq da linha 50 se a ocorrência está na 100 ???

não entendi muito bem....

[]'s

2011/6/26 "Flávio R. Lopes" <flavio.lopes em links.inf.br>

> **
> 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>
>
>> 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
>> 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> <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> <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/cf6b9240/attachment-0001.html>