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]
