Oh Jesus, I'm on too many mailing lists. Ignore this
On Wednesday 13 February 2002 05:44 pm, you wrote:
> There are scripts like this all over the net, but here's one for you to
> save you searching time:
>
> use CGI qw(:standard);
>
> $| = 1;
> $i=param('fileuploadname');
>
> open(OUTPUT, ">/li
There are scripts like this all over the net, but here's one for you to save
you searching time:
use CGI qw(:standard);
$| = 1;
$i=param('fileuploadname');
open(OUTPUT, ">/lists/$i") or die "cannot find output: $!";
while ($bytes = read($i,$buffer,1024)) {
$bytesread += $bytes;
print OU
