Foro - Perl en Español

por **carlitos_30** » 2013-06-27 19:51 @868

Hola.

Quería consultar lo siguiente. Tengo un script que guarda código HTML de varias páginas. Lo que quiero hacer es guardar el código de cada página, cosa que más tarde pueda ejecutar el analizador que quiero hacer y no tener que descargar a cada rato las páginas para corregir cosas.

Lo que he estado haciendo es grabar cada página en un archivo dándole un nombre dinámico:

Sintáxis: [ Descargar ] [ Ocultar ]

open my $fh, ">", "Pagina$[i].txt";
$i++;

Después leo cada archivo y aplico el analizador.

Lo otro es guardar todo el texto HTML en un mismo archivo y entre cada texto insertar una secuencia de caracteres como delimitador de cada texto HTML.

Si tengo, por ejemplo, más de 1000 textos HTML independientes, necesitaría crear 1000 archivos, y así sucesivamente.

Lo que me pregunto es si hay una forma más eficiente/inteligente de hacer esto.

Gracias.

Yo creo que no hay problemas en almacenar cada página como archivo independiente. Yo me he enfrentado a problemas parecidos, con miles de archivos para procesar en varios directorios.

Si no ocupan mucho, otra opción es meterlos en registros de una base de datos. Pero es más difícil verlos si en algún momento dado quieres consultar y editar uno de ellos. Si fueran archivos, entrarías en el directorio y lo editarías directamente.

Lo de ponerlos todos juntos puede ser un lío. El archivo puede ser muy grande para manejar. O para localizar información. Pero puede resultar una buena idea si se trata de procesar su contenido. Por ejemplo, para extraer información o para pasarle un corrector ortográfico. El tenerlo todo junto te ahorra el tener que gestionar la carga de cada uno de forma independiente. En contra, si vas a hacer cambios en su contenido, tenerlo todo junto puede no ser la forma más flexible.

¿Cuánto ocuparía toda la información?

por **carlitos_30** » 2013-06-28 09:40 @444

Gracias por la ayuda.

Y el proceso de crearlos que puse ¿está bien o hay una forma más inteligente?

Sintáxis: [ Descargar ] [ Ocultar ]

open my $fh, ">", "Pagina$[i].txt";
$i++;

por **explorer** » 2013-06-28 10:07 @463

No es correcto... creo que hay un error de sintaxis...

Mejor así:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my $archivo = "pagina0000";
 
# dentro del bucle de archivos:
{
    open my $fh, ">", "$archivo.html";
    ...;
    close $fh;
 
    $archivo++;         # incremento mágico
}
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

por **carlitos_30** » 2013-06-28 13:23 @599

Gracias. Así queda mejor.

Foro - Perl en Español

Persistencia. Guardar datos para reutilizarlos después

Persistencia. Guardar datos para reutilizarlos después

Publicidad

Re: Persistencia. Guardar datos para reutilizarlos después

Re: Persistencia. Guardar datos para reutilizarlos después

Re: Persistencia. Guardar datos para reutilizarlos después

Re: Persistencia. Guardar datos para reutilizarlos después

¿Quién está conectado?