Found a way to use CGI.pm to do it...........this pops a 'browse to the file' dialogue box and lets the user upload the file. A few paths and such have been changed to protect the innocent.<br><br><FONT FACE=monospace>#!/usr/local/bin/perl<br>use CGI;<br>$thisCGI = '/cgi-bin/upload';<br><br>$query = new CGI;<br>print $query->header,$query->start_html(-title=>"UPLOAD THIS"

;<br>print $query ->start_multipart_form('POST',"$thisCGI"

;<br><br>print "Enter or Browse to the file you would like to upload.<BR>\n";<br>print $query->filefield(-name=>'fileID',<br> -size=>50,<br> -maxlength=>80);<br><br>my $fileID = $query->param('fileID');<br>@pathName = split(/\\/,$fileID);<br>$newFile = '/where/do/you/want/it/';<br>$newFile .= pop(@pathName);<br><br>if ($fileID)<br> {<br> open(OPF,">$newFile"

¦¦ &showError("Failed to open OPF, $!"

;<br> while ($bytesread=read($fileID,$buffer,2048)) <br> { print OPF "$buffer"; }<br> $type = $query->uploadInfo($fileID)->{'Content-Type'};<br> print "<BR>Upload of $newFile of type $type Successful<BR>\n";<br> }<br><br>print '<BR>',$query->submit('doWhat','uploadMe');<br>print $query->end_form;<br>print $query->end_html;<br><br>sub showError<br>{<br>my @error = @_;<br>print "<CENTER><font color=\"\#ff4500\">Fatal ERROR - @error</font><BR>\n";<br>print "Submission aborted - your data was not saved!!<BR>\n";<br>print "Please use the BACK button to return to the previous page<BR>\n";<br>print "and correct the error.<BR></CENTER>\n";<br>print $query->end_form,$query->end_html;<br>exit;<br>}<br><br></font><br>See the docs for CGI.pm to about checking file types and such......<br><br>'hope this helps. <p> <br><a href=mailto: > </a><br><a href= > </a><br> keep the rudder amid ship and beware the odd typo