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" <[email protected]
<mailto:[email protected]>>
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: [email protected]
<mailto:[email protected]>
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: [email protected]
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: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
