RE: ejecutar AWK dentro de Perl
Miguel
Te agradezo de ante mano y tenías razón en las 2 cosas.
GRACIAS
-----Mensaje original-----
De: Miguel Rodríguez Penabad [mailto:penabad@udc.es]
Enviado el: Viernes, 20 de Febrero de 2004 06:24
Para: debian-user-spanish@lists.debian.org
Asunto: Re: ejecutar AWK dentro de Perl
On Thursday 19 February 2004 23:00, Montervino, Mariano wrote:
[...]
> #!/usr/bin/perl -w
> $dom_ = `awk '/workgroup/ {print $3 }' /etc/samba/smb.conf`;
> print $dom;
>
> me devuelve: (toda la linea completa)
> workgroup = XXXXX
>
> Que estoy haciendo mal??? Hay forma de solucionarlo???
Bueno, copiando el script, aparte de que usas $dom_ en la asignación y $dom
en
el print (supongo que es un error de transcripción), el problema es que perl
interpreta en el "print $3" que hay una variable $3. "escápala":
{print \$3} a mi me ha funcionado
Saludos
Miguel
PD: Pelín off-topic en esta lista, no?
--
========================================================================
Miguel Rodriguez Penabad penabad@udc.es
Laboratorio de Bases de Datos http://emilia.dc.fi.udc.es/labBD
Despacho 0.01 Tel. 981 167000 ext. 1333
Facultade de Informática Universidade da Coruña (Spain)
========================================================================
--
To UNSUBSCRIBE, email to debian-user-spanish-request@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact
listmaster@lists.debian.org
Reply to: