Perl class for creating random image.