[SP-pm] ER para separar o primeiro e o último campo de um registro.

jimmy ronaldo_tgz at yahoo.com.br
Mon Dec 22 09:01:03 PST 2008


saudações wagner,

sou iniciante em  perl  e  me  parece mas fácil fazer  split  nas  linhas  pelo
caracter de espaço e imprir o  primeiro e o último  elemento, a menos  que  seu
arquivo  fuja do  padrão que  você  usou  para  exemplificar, isso  também deve
funcionar.

On Mon, Dec 22, 2008 at 02:47:01PM -0200, Wagner Arbex wrote:
> Eu mesmo respondo :D acabei de fazer com
> 
> $ultimo =~ s/.*\s(.*$)/$1/;
> 
> Se alguém tiver uma sugestão melhor... eu agradeço.
> 
> []s e obrigado.
> 
> 
> On 12/22/2008 02:37 PM, Wagner Arbex wrote:
> > Prezados Monges... estou com um pequeno prob com ERs e tenho certeza de
> > que é trivial, mas agarrei.
> > 
> > Vou dar um exemplo simplificado. Tenho um arquivo com vários registro
> > que pode ser, por ex:
> > 
> > 1         ABC X Y CDA 40
> > 5         XYZ - U BBB  0
> > 8         --- T C CTT 80
> > 
> > E gostaria de gravar um arquivo com:
> > 
> > 1,40
> > 5,0
> > 8,80
> > 
> > O que eu preciso é ler esse arquivo e separar o primeiro e o último
> > campo para gravá-los em outro arquivo, seria +-
> > 
> > while ( <ARQ1> ) {
> >    chomp;
> > 
> >    my $primeiro = $_;
> >    $primeiro =~ s/\s.*//;  # OK... esse funciona.
> > 
> >    my $ultimo = $_;
> >    $ultimo =~ s/.*\s.+$//; # Bom, aqui eu não sei qual a ER a ser usada.
> > 
> >    print ARQ2 "$primeiro,$ultimo\n";
> > }
> > 
> > Além de me ajudarem com a ER, todas as sugestões para eu melhorar o
> > código, conhecer novas estruturas, formas de fazer etc são muito bem vindas.
> > 
> > []s e, desde já, obrigado.
> 
> 
> -- 
>    Wagner Arbex
>    Doutorando em Engenharia de Sistemas e Computacao - COPPE/UFRJ
> 
>    Vendo notebook - http://www.arbex.pro.br/
> 
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
________________________________________________________________________


More information about the SaoPaulo-pm mailing list