well...in that case...here's the complete thing u'd require to upload a picture to your website.
The HTML --
<HTML>
<HEAD></HEAD>
<BODY>
<FORM ACTION="upload.cgi" METHOD="post" ENCTYPE="multipart/form-data"> (If your html page is not in the same page as the cgi script, then u need to give the full absolute path of the script instead of just upload.cgi)
Photo to Upload: <INPUT TYPE="file" NAME="photo">
<br><br>
Your Email Address: <INPUT TYPE="text" NAME="email_address">
<br><br>
<INPUT TYPE="submit" NAME="Submit" VALUE="Submit Form">
</FORM>
</BODY>
</HTML>
The above page would display only a file field to select the picture and a text field for entering the email of the user.You can add more fields like name, address etc. according to your needs.
And here's the complete cgi script-
#!/usr/bin/perl -w
use CGI;
use CGI::Carp qw/fatalsToBrowser warningsToBrowser/;
$upload_dir = "/uploads";
my $query = new CGI;
print $query->header();
warningsToBrowser(1);
print $query->start_html();
$filename = $query->param("photo");
$email_address = $query->param("email_address");
$filename =~ s/.*[\/\\](.*)/$1/;
$upload_filehandle = $query->upload("photo");
open UPLOADFILE, ">$upload_dir/$filename";
binmode UPLOADFILE;
while ( <$upload_filehandle> )
{
print UPLOADFILE;
}
close UPLOADFILE;
print $query->header ( );
print <<END_HTML;
<HEAD>
<TITLE>Thanks!</TITLE>
</HEAD>
<BODY>
<P>Thanks 4 uploading your photo!</P>
<P>Your email address: $email_address</P>
<P>Your photo:</P>
<img src="/uploads/$filename" height="200" width="200">
</BODY>
END_HTML
print $query->end_html();
You must check twice that the permissions for the upload directory and the upload.cgi script are appropriately set, and path to show the picture corresponds to the $upload_dir path.And you can check to see manually whether the picture has been uploaded to the server or not by using an ftp program or any other means your webhost has provided.
If all's fine then u must get this thing going.
Naveen