[Perl] linea de comandos...

[Gunnar Wolf]

> > > cat usuarios.txt | awk -F: {'print $1"\@midominio.com"'}
>
> > Traducci=F3n literal:
>
> > cat usuarios.txt | perl -e 'while (<>) {chomp;print "$_\@midominio.com\=
n"}'
>
>  Nopo, dice mi am=E1 que as=ED no:
>
> =09cat usuarios.txt | perl -ne 'split(/:/); print "$_[0]\@dominio.com\n"'

Ummm... =BF?

No entiendo por qu=E9 divides la entrada con /:/ - No est=E1 leyendo de
/etc/passwd, sino que de un archivo que tiene los nombres de usuario -
hasta donde entiendo, claro...

Y es necesario darle el chomp - Es la diferencia entre

gwolf
@dominio.com
usuario
@dominio.com

y

gwolf@midominio.com
usuario@midominio.com

Saludos,

--=20
Gunnar Wolf - gwolf@campus.iztacala.unam.mx - (+52-55)5623-1118
PGP key 1024D/8BB527AF 2001-10-23
Fingerprint: 0C79 D2D1 2C4E 9CE4 5973  F800 D80E F35A 8BB5 27AF