Yes You can.
1st part
print " <form method=post name=forandre>";
    print "     <input type=file name=filetoupload>";
    print "<input type=submit name=save value=Save>";
print "</form>";


select file from local machine using file field.
field name is filetoupload.
afeter submiting you get value of file field at server side using



   $filename=$q->param("filetoupload");
   if(!open(OUTFILE, ">$SAVE_DIRECTORY$Filename"))
  {
      print "Can't open the file";
 }
binmode(OUTFILE);
    while ($Bytes = read($filename,$Buffer,1024))
    {    $BytesRead += $Bytes;
         print OUTFILE $Buffer;
    }

printing $BytesRead you get size of uploaded file

rgds
     shine
----- Original Message -----
From: "Andre" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, December 13, 2002 12:49 PM
Subject: Uploading files


Hi
I know it is not entirely perl, but can anybody esplain me how does i do
upload a file using a browser (can i use perl to do this)?
Thanks





-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to