[Cascavel-pm] duvida - ler arquivo

[Solli Honorio]

E além de fazer bem como exercício mental, faz bem para o nosso ego....


On 4/28/07, Fernando Oliveira <fernandocorrea em gmail.com> wrote:
>
> 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
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
<b>
"o animal satisfeito dorme". - Guimarães Rosa </b>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20070428/b1998577/attachment.html