[Cascavel-pm] Ler Arquivo

Igor Sutton igor.sutton em gmail.com
Terça Maio 30 11:15:35 PDT 2006


Tente isto:

while ($_ = <DATA>) {
    next if /^\s*-\s*(?:END\s+)?TESTE.*$/;
    print;
}

On 5/30/06, Patty Silva <ptfzs em yahoo.com.br> wrote:
>
> Eu ja tinha postado :) mas vai la!!
>
> while (<FILE>)
> {
>     local $/ = '\s - TESTE\n';
>     print $_;
>
> }
>
> No caso nao funcionou..
>
> eu quero pegar tudo que vem depois de - TESTE ou seja
> meu arquivo
> - TESTE VARIAVEL1
> Joao 23 Minas Centro
> Maria Sao Paulo
> - TESTE VARIAVELT
>   JOSE 32
> Roberto 34
> - TESTE VARIAVELB
> bla bla bla
>
> - END TESTE
>
> Eu quero pegar que vem depois do TESTE para eu fazer um relatorio
> ex:
> Joao 23 Minas Centro
> Maria Sao Paulo
> JOSE 32
> Roberto 34
> bla bla bla
>
>
> :)
> Estou sem meu codigo completo aqui!! por isso nao postei..
>
> Obrigaduss
> :)
>
>
> em um arquivo separado criar
>
>
>
> *Igor Sutton <igor.sutton em gmail.com>* escreveu:
>
> Patty,
>
> Mais uma vez... este é o seu arquivo de input, seria interessante que você
> postasse o código que você escreveu. Você quer ler o que esteja entre
> "^-\s+TESTE$" e "^-\s+END\s+TESTE$" ou entre "-\s+TESTE$" e "-\s+TESTE$" ?
> Responda esta mensagem com o seu código também, por favor.
>
> On 5/30/06, Patty Silva <ptfzs em yahoo.com.br> wrote:
> >
> > Pessoal, ja tentei de tudo(ou quase tudo ) :)
> > mas nao consigo somente ler os dados entre
> > - TESTE
> >
> > bla bla bla
> > bla
> >
> > - TESTE
> >
> > bla
> > bla
> > bla
> >
> > - TESTE
> >
> > bla bla bla
> >
> > - END TEST
> >
> > :(
> >
> > Alguem pode me dar um help/ please.. tentei usar o delimitador mas nao
> > foi tb1!
> >
> > Obrigada
> >
> >
> > *"Flavio S. Glock" < fglock em gmail.com>* escreveu:
> >
> > > Patty Silva wrote:
> > > > {
> > > > local $/ = '\s - TE\n';
> >
> > Experimente usar aspas duplas " - TE\n"
> >
> > - Flavio S. Glock
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
> > ------------------------------
> > Abra sua conta no Yahoo! Mail<http://us.rd.yahoo.com/mail/br/tagline/mail/*http://mail.yahoo.com.br/>- 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
>
>
> --
> Igor Sutton Lopes
> http://www.izut.com/ _______________________________________________
>
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> ------------------------------
> Abra sua conta no Yahoo! Mail<http://us.rd.yahoo.com/mail/br/tagline/mail/*http://mail.yahoo.com.br/>- 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>


-- 
Igor Sutton Lopes
http://www.izut.com/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060530/7b342c1b/attachment-0001.html 


Mais detalhes sobre a lista de discussão Cascavel-pm