Hello!
I have a simple form with a file upload field. Then, I want to save the
uploaded file into a directory. So here it the code:
#!/usr/bin/perl
use strict;
usw warnings;
use CGI;
my $q = new CGI;
my $filename = $q->upload('fisier');
my $buffer;
open (OUTFILE, ">>/test/$filename");
while (
On Jo, 2002-11-28 at 09:55, Stelian Iancu wrote:
> Hello!
>
> I have a simple form with a file upload field. Then, I want to save the
> uploaded file into a directory. So here it the code:
>
> #!/usr/bin/perl
>
> use strict;
> usw warnings;
> use CGI;
>
>
Hello!
I try to download a file from a CGI script. Here is the code:
$self->header_props(-type=>'application/x-octet-stream',
-attachment=>$file);
open(FILE, $file);
binmode(FILE);
$/ = undef;
my($data) = ;
close(FILE);
binmode(STDOUT);