usuario anonimo escribió: > On 19/10/06, Julio Pacheco <[EMAIL PROTECTED]> wrote: > >> Estimados: >> >> Tengo un directorio con 1000000+ archivos de diversos tipos. > > > diversos tipos ? como cuales, de texto plano hasta binarios ? > > y en todos los tipos de archivos debes buscar ? osea el texto buscado > puede estar en cualquier tipo de archivo ?
Si. >> Necesito identificar sólo aquellos que contienen un patrón de la >> siguiente forma: >> >> texto_a_buscar[nul][nul](otro texto) > > > nul ? un espacio ? No, es el caracter 0x00 >> >> en que texto_a_buscar puede aparecer en otros archivos (texto, >> código,etc). >> Es posible hacer la búsqueda con un simple grep, o tengo que cocinar >> algo en perl? >> Hasta el momento, he probado con: >> >> grep "texto_a_buscar\0\0" * >> grep "texto_a_buscar\x00\x00" * >> grep "texto_a_buscar\000\000" * >> >> ninguna de las cuales funciona. >> Una prueba rápida con perl -ne 'print if m#texto_a_buscar\x00\x00#' * >> encuentra el texto, >> pero necesito que muestre el nombre de archivo. >> >> Ideas? > > > for i in `ls -1 *`; do echo $i; perl -ne 'print if > m#texto_a_buscar\x00\x00#' $i; echo "### FIN $i ###"; done > >> -- >> Julio Pacheco T. >> Consultor Tecnológico >> ProVectis S.A. >> > > -- Julio Pacheco T. Consultor Tecnológico ProVectis S.A. From [EMAIL PROTECTED] Thu Oct 19 13:33:57 2006 From: [EMAIL PROTECTED] (Roberto Bonvallet) Date: Thu Oct 19 13:33:21 2006 Subject: =?iso-8859-1?q?b=FAsqueda?= de texto In-Reply-To: <[EMAIL PROTECTED]> References: <[EMAIL PROTECTED]> Message-ID: <[EMAIL PROTECTED]> Julio Pacheco: > Una prueba rápida con perl -ne 'print if m#texto_a_buscar\x00\x00#' * > encuentra el texto, pero necesito que muestre el nombre de archivo. # ojo, no lo he probado for file in * do perl -ne 'if /texto\x00\x00/ {print "'$file'\n"; exit;}' < $file done -- Roberto Bonvallet From [EMAIL PROTECTED] Thu Oct 19 13:41:04 2006 From: [EMAIL PROTECTED] (Alvaro Herrera) Date: Thu Oct 19 13:40:40 2006 Subject: =?iso-8859-1?q?b=FAsqueda?= de texto In-Reply-To: <[EMAIL PROTECTED]> References: <[EMAIL PROTECTED]> Message-ID: <[EMAIL PROTECTED]> Julio Pacheco escribió: > ninguna de las cuales funciona. > Una prueba rápida con perl -ne 'print if m#texto_a_buscar\x00\x00#' * > encuentra el texto, pero necesito que muestre el nombre de archivo. > > Ideas? Mira perlvar(1). Segun eso, $ARGV es el nombre del archivo que estas actualmente leyendo. -- Alvaro Herrera http://www.advogato.org/person/alvherre "Cuando mañana llegue pelearemos segun lo que mañana exija" (Mowgli) From [EMAIL PROTECTED] Thu Oct 19 12:21:53 2006 From: [EMAIL PROTECTED] (Victor Hugo dos Santos) Date: Thu Oct 19 13:58:10 2006 Subject: tcpwrappers In-Reply-To: <[EMAIL PROTECTED]> References: <[EMAIL PROTECTED]> <[EMAIL PROTECTED]> <[EMAIL PROTECTED]> Message-ID: <[EMAIL PROTECTED]> 2006/10/18, Miguel Angel Amador L <[EMAIL PROTECTED]>: > iptables -I INPUT -s 0.0.0.0 -p tcp --dport 22 -j REJECT > iptables -I INPUT -s 172.16.100.110 -p tcp --dport 22 -j ACCEPT > > Ejecutalas en ese orden... mmmm.. me me viene la duda, de cual es el mejor método tcpwrappers o iptables para bloquear/autorizar acceso a algún servicio (ssh en este caso) ... comentarios/links ??? salu2 -- -- Victor Hugo dos Santos Linux Counter #224399