Foro - Perl en Español

Hola a todos. Bueno, soy principiante en Perl y estoy tratando de hacer un código que me extraiga todas la imágenes de cualquier página web. La idea es poder clasificarlas por tipo (jpg, png, etc) Solo lo estoy haciendo para poder practicar. He estado usando WWW::Mechanize pero no entiendo su funcionamiento. Estoy usando el $mech->images que se supone lee todas las imágenes de la página... pero no sé cómo rescatarlas... si alguien pudiera orientarme...


Gracias.

Me he estado mirando el tutorial de WWW::Mechanize y lo que hace $mech->images es listarte todas las imágenes de la página, para buscar imágenes hay $mech->find_image() , te recomiendo que te pases a ver el tutorial en: http://search.cpan.org/~petdance/WWW-Me ... chanize.pm

Bienvenido a los foros de Perl en Español, xxfabianxx.

El método images() devuelve una lista con las imágenes encontradas en el HTML. Cada elemento de la lista es un objeto del tipo WWW::Mechanize::Image. Dos de los métodos de estos objetos es base() y name(), que devuelven la URL y el nombre de la imagen (si la imagen tiene nombre, realmente).

Solo tienes que hacer un bucle para guardar a disco todas las imágenes, con la ayuda de mirror() (no probado):

(basado en el último ejemplo de WWW::Mechanize::Examples)
Usamos basename() para extraer el nombre del fichero, desde la URL.

Se agradece... Ahora, si no fuera mucha la molestia, ¿cómo puedo guardar esas imágenes en la carpeta que yo quiera? He hecho algo con mkdir() pero no sé cómo dejar las imágenes dentro... Gracias... Reitero que soy principiante...

Lo que puedes hacer es meterte en ese directorio, antes de bajarlas:


Y luego ya viene el bucle del mirror(), que colocará las imágenes en ese directorio.

Otra forma distinta, es agregando el $directorio en el nombre del fichero destino donde se guardarán las imágenes:

Gracias, he entendido de maravilla esto... les agradezco mucho... muy bueno el foro...