Photo 1: <input type=file name=photo><br>
Photo 2: <input type=file name=photo><br>
Photo 3: <input type=file name=photo><br>
...

##</code><code>##

#!/usr/bin/perl -w
use strict;
use CGI;

my $cgi = CGI->new;
my @pictures = $cgi->param('photo');
...

##</code><code>##

use strict;