WWW::ImageSpool 0.01

WWW::ImageSpool is a Perl module that can cache images of interest from the web.

SYNOPSIS

use WWW::ImageSpool;

mkdir("/var/tmp/imagespool", 0700);

my $spool = WWW::ImageSpool->new
(
limit => 3,
searchlimit => 10,
max => 5 * 1048576,
dictionary => "sushi.txt",
verbose => 1,
dir => "/var/tmp/imagespool"
);

$spool->run();
while($spool->uptime < 86400);

When A WWW::ImageSpool objects run() method is called, it randomly picks keywords out of a chosen dictionary file and attempts to download images off of the internet by doing searches on these keywords. (Currently only a Google Image Search is done, via Guillaume Rousses WWW::Google::Images module, but the internals have been set up to make it easy to hook into other engines in the future.) Images are stored in the specified directory. If the directory grows beyond the maximum size, the oldest files in the directory are deleted.

The intended purpose behind this module is to supply images on demand for any piece of software that wants abstract images, such as screensavers or webpage generators or voice synthesizers (wouldnt it be cool if a voice synthesizer extracted all the popular nouns out of a book and scrolled by pertanent images as it read to you?)