[perl] filtrando con perl

[lrgallardo@abl.com.mx]

aureliano writes:
 > Hola lista...
 > 
 > quisiera hacer algo similar a lo que hago con awk en linea de comandos
 > pero en perl:
 > 
 > cat messages | awk '{print $2" "$3$6" " }' 
 > 
 > probe con 
 > 
 >  perl -ne "print $1 ; " messages
 > 
 > pero me imprime toda la linea.

Eso es por que no haz separado la linea en partes. Awk lo hace solo,
pero a perl debes decirle.

Haz algo como

   perl -ne "print ((split)[2,3,6])" messages

o si vaz a procesarlo más

  perl -ne '@a=split;print "$a[1] $a[4,5] \n"' messages

ˇTen cuidado con las comillas!

-- 
--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl