[SP-pm] Selecionar texto após uma determinada linha em um arquivo
"Flávio R. Lopes"
flavio.lopes at links.inf.br
Sun Jun 26 17:25:16 PDT 2011
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>
More information about the SaoPaulo-pm
mailing list