Ola Nelson!1<br><br>Tentei usar o delimitador so que nao funcionou:<br>olha o codigo<br><br>while (<FILE>) <br>{<br> local $/ = '\s - TE\n';<br> print $_;<br> <br>}<br><br>Ele imprime todos os dados do arquivo!! :>)<br><br>Quero pegar tudo entre -TE e o ultimo -TE termina com o END TE :)<br><br>Obrigada<br><br><b><i>Nelson Ferraz <nferraz@gmail.com></i></b> escreveu:<blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"> Patty Silva wrote:<br>> Pessoal.. tenho um arquivo com diversas linhas.. so que quero ler tudo <br>> que comeca com (- TE), recuperando 4 COLUNA e a 5 e depois a outra linha <br>> de baixo tb :)<br>> Nao sei se fui clara..:) mas quem puder me ajudar,,<br>> <br>> agradeceria<br>> <br>> Obrigada<br>> <br>> Obs: Quero Recuperar as linhas ABAIXO de TE independente da
quantidade<br><br>Patty,<br><br>Você tem certeza de que já não consegue resolver este tipo de problema <br>sozinha? Comece com um loop normal:<br><br>while (<>) {<br> # ...<br>}<br><br>Verifique se a linha começa com "- TE":<br><br>while (<>) {<br> if (/^- TE/) {<br> # ...<br> }<br>}<br><br>Esta é uma maneira.<br><br>Outra maneira mais "idiomática" é definir a variável $/ (input record <br>separator) com "- TE":<br><br>$/ = "- TE";<br>while (<>) {<br> # ...<br>}<br><br>Nesse caso, ao invés de trabalhar linha por linha (ou seja, delimitadas <br>por "\n"), você pega blocos maiores, delimitados por "- TE".<br><br>Existem muitas maneiras de se fazer isso.<br><br>Depois você tem que extrair valores de uma linha. Você sabe qual é o <br>tipo de delimitação usada? Verificou se existe algum módulo que pode <br>ajudar? (http://search.cpan.org)<br><br>[]s<br><br>Nelson<br>_______________________________________________<br>Cascavel-pm mailing
list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm<br></blockquote><br><p>
                <hr size=1>
<a href="http://us.rd.yahoo.com/mail/br/tagline/mail/*http://br.info.mail.yahoo.com/">Abra sua conta no Yahoo! Mail</a> - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.