You might take a look at the documentation provided with the CGI.pm module. Look for the upload() method, and play around with example code. Learning by playing around helps more than getting a full-featured script from anyone here (IMHO)

Jouke Visser, Perl 'Adept'