[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

ejecutar AWK dentro de Perl



El archivo smb.conf contiene una linea de la siguiente forma:
workgroup = XXXXX

Si ejecuto awk '/workgroup/ {print $3 }' smb.conf desde el shell me devuelve
XXXXX
pero cuando lo hago desde el siguiente script usando PERL

#!/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???

Gracias a todos.



Reply to: