Perhaps your script is not finding the relative path 'images/'. To find the images from wherever the script runs, use an absolute path, or employ $ENV{DOCUMENT_ROOT}.

You may find glob(*.{jpg,gif}) convenient, and CGI.pm has some very handy tricks for distributing tags over a list. Something like:

print $cgi->Tr( 
               $cgi->td(
                        {-align=>'center'},
                        [splice @images,0,4]
                       )
               ),
      $/ while @images;
[download]

CGI.pm has the special behavior of taking an array reference argument as a sign to map. $foo = CGI::footag(\@ary) is equivalent to $foo = join ' ', map {CGI::footag($_)} @ary;

After Compline,
Zaxo