[Cascavel-pm] duvida - ler arquivo

Fernando Oliveira fernandocorrea em gmail.com
Sábado Abril 28 08:22:51 PDT 2007


isso é divertido, né?!


Em 28/04/07, Fernando Oliveira <fernandocorrea em gmail.com> escreveu:
>
> diminuí o meu...
>
> perl -e 'while(<*>){print$_,$/if-f}'
>
> e eu não esquecí do \n... eu não preciso setar o $, pq não estou
> imprimindo lista...
>
> e tirei 1 caracter do seu:
>
> perl -e 'print$_,$/for grep{-f}<*>'
>
> Em 28/04/07, Solli Honorio <shonorio em gmail.com> escreveu:
> >
> > On 4/28/07, Fernando Oliveira < fernandocorrea em gmail.com> wrote:
> > >
> > > o diamante (<>) já traz na ordem...
> > > e qto não imprimir subdiretórios, q tal assim:
> >
> > Interessante, eu nunca prestei atenção neste detalhe .. pelo jeito tenho
> > alguns códigos "desnecessário" :( .... mas acho que posso melhorar um
> > pouquinho, se vc me permitir :)
> >
> > perl -e '$,=$\=$/;print grep{-f}<*>'
> >
> > ... e não esqueça do "\n" :)
> >
> > Solli M. Honorio
> >
> >
> > perl -e '$\=$/;do{print if-f}while<*>'
> > >
> > > Em 28/04/07, Solli Honorio <shonorio em gmail.com > escreveu:
> > > >
> > > > hummmm, vc não resolve o problema de conter diretórios e nem a ordem
> > > > solicitado, que tal :
> > > > perl -e '$,=$\=$/;print sort grep{-f}glob($d);'
> > > >
> > > > Solli M. Honório
> > > >
> > > > On 4/27/07, Fernando Oliveira <fernandocorrea em gmail.com > wrote:
> > > > >
> > > > > perl -e '$,=$\=$/;print<$caminho/*>'
> > > > >
> > > > > Desculpem... adoro one-liner...
> > > > >
> > > > > Em 27/04/07, Patty Silva < ptfzs em yahoo.com.br > escreveu:
> > > > > >
> > > > > > Pessoal
> > > > > >
> > > > > > fiz assim:
> > > > > > foreach my $arquivo (sort(readdir DIR))
> > > > > > {
> > > > > >     next if $arquivo eq '.' or $arquivo eq '..';
> > > > > >         print "FILE $arquivo\n";
> > > > > > }
> > > > > >
> > > > > > funcionou :D
> > > > > >
> > > > > > *Patty Silva < ptfzs em yahoo.com.br >* escreveu:
> > > > > >
> > > > > > Ola pessoal..
> > > > > > Estou com uma duvida...
> > > > > > eu estou fazendo assim:
> > > > > >
> > > > > >
> > > > > > --------------------------------------------------------------------------------------------------------------------
> > > > > >
> > > > > > opendir(DIR, $caminho) or die "Can't open directory:$!";
> > > > > >
> > > > > > while($arquivo = readdir(DIR))
> > > > > > {
> > > > > >
> > > > > >         next if $arquivo eq '.' or $arquivo eq '..';
> > > > > >         chdir($caminho) || die "\n *** Erro no diretorio
> > > > > > $caminho ***";
> > > > > >
> > > > > >         print "Arquivo $arquivo\n"
> > > > > > }
> > > > > >
> > > > > >
> > > > > > --------------------------------------------------------------------------------------------------------------------
> > > > > >
> > > > > > Para ler arquivos de um diretorio..
> > > > > > Dentro desse diretorio tem arquivos nesse formato yyyymmdd_hhmm
> > > > > > Eu quero q ele pegue em ordem crescente.. tem como?
> > > > > >
> > > > > > ex: no diretorio tem: 20070426_0500  20070426_1200 20070426_0300
> > > > > > quero que ele leia na ordem:
> > > > > > 1) - 20070426_0300
> > > > > > 2) - 20070426_0500
> > > > > > 3) - 20070426_1200
> > > > > >
> > > > > >
> > > > > > Como posso fazer isso? :D
> > > > > >
> > > > > > Obrigada pessoal
> > > > > >
> > > > > > []s
> > > > > >
> > > > > >
> > > > > >  __________________________________________________
> > > > > > Fale com seus amigos de graça com o novo Yahoo! Messenger
> > > > > > http://br.messenger.yahoo.com/_______________________________________________
> > > > > > Cascavel-pm mailing list
> > > > > > Cascavel-pm em pm.org
> > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > > > >
> > > > > >
> > > > > > __________________________________________________
> > > > > > Fale com seus amigos de graça com o novo Yahoo! Messenger
> > > > > > http://br.messenger.yahoo.com/
> > > > > >
> > > > > > _______________________________________________
> > > > > > Cascavel-pm mailing list
> > > > > > Cascavel-pm em pm.org
> > > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > > > >
> > > > >
> > > > >
> > > > >
> > > > > --
> > > > > []'s Fernando
> > > > > _______________________________________________
> > > > > Cascavel-pm mailing list
> > > > > Cascavel-pm em pm.org
> > > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > > >
> > > >
> > > > _______________________________________________
> > > > Cascavel-pm mailing list
> > > > Cascavel-pm em pm.org
> > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > >
> > >
> > >
> > >
> > > --
> > > []'s Fernando
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> >
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> []'s Fernando
>



-- 
[]'s Fernando
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20070428/0649c4c4/attachment.html 


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