NAME

Image::Random - select random image from a file

SYNOPSIS

use Image::Random;
printf '<img src="%s">', Image::Random->from_dir('/img/frontpage') ;

DESCRIPTION

This module selects an image at random from a specified directory. It filters the file list using the regexp

/[.](gif|jpeg|jpg|png)$/

which is stored in the scalar $Image::Random::image_filter

The random number seed is the function Image::Random::srander.

At present, it does not recursively search directories --- it simply looks in the present directory.

EXPORT

None by default.

SEE ALSO

• perldoc srand

• perldoc perlretut

AUTHOR

Terrence Brannon, <terry@hcoop.net>

COPYRIGHT AND LICENSE

Copyright (C) 2004 by Terrence Brannon

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.4 or, at your option, any later version of Perl 5 you may have available.