[Cascavel-pm] Res: Ler arquivo - ultimas linhas

Solli Honorio shonorio em gmail.com
Sexta Agosto 31 19:36:52 PDT 2007


Fernando e seu vício em código one-line. Cara tenho medo só de imaginar como
devem ser os teus códigos :) ... excelente tacada.

Abraços,

Solli M. Honório

On 8/31/07, Fernando Oliveira <fernandocorrea em gmail.com> wrote:
>
> perl -e 'print((<>)[-3..-1])' arquivo
>
> Em 31/08/07, eden <edencardim em gmail.com> escreveu:
> >
> > On 8/31/07, Patty Silva <ptfzs em yahoo.com.br> wrote:
> > >
> > > #!/usr/bin/perl
> > >
> > >  @ARGV == 2 or die "entre com o nome do arquivo e a linha que deseja
> > <NOME>
> > > <LINHA>\n";
> > >
> > >  ($arquivo, $linha) = @ARGV;
> > >  open(INFILE, "< $arquivo") or die "Nao é possivel abrir o arquivo
> > para
> > > leitura: $!\n";
> > >  while (<INFILE>) {
> > >      $linha = $_;
> > >      last if $. == $linha;
> > >  }
> > >  if ($. != $linha) {
> > >      die "Nao eh possivel encontrar a linha desejada no arquivo...\n";
> >
> > >  }
> > >  print;
> >
> > Bem, pelo visto, o desempenho não importa, então, golfe!
> >
> > perl -e 'print(reverse((reverse <>)[0..2]))' arquivo
> >
> > --
> > edenc.vox.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
>



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


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