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
