"[EMAIL PROTECTED]" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> <FORM METHOD="POST" ACTION="/cgi-bin/ftp_test.pl">
> <INPUT NAME="Filename" TYPE="FILE"><BR>
> Input the Filename You Wish To Transfer
> <P><P>
> <INPUT TYPE="SUBMIT" VALUE="Submit"><P>
> </FORM>
read: perldoc -M CGI
Uploading via a web browser is via http. The file is included with the
request to the server. FTP has nothing to do with it. Once the user clicks
submit, do whatever you please with the file. The capabilities are only
limited by your imagination.
Call this upload.pl and change the action property in the html above:
#!/usr/bin/perl -w
use strict;
use CGI;
my($query) = CGI->new();
print $query->header(-content_type => 'text/plain');
print 'Contents of the uploaded file: ', $query->param('Filename'), "\n\n";
# $fh is a filehandle on the uploaded file
$fh = $query->upload('Filename');
while (<$fh>) {
print;
}
This will dump the file back to the user inside the browser window. Putting
the data in a file or attaching it to an email is left as an exercise to the
poster.
trwww
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
