On Tue, 18 Jun 2002, David vd Geer Inhuur tbv IPlib wrote:
>
> Hi,
>
> It looks like some stuff is mixed up.
> Who is what ??
>
> $foto ??
> $path/$number/$foto ??
>
> Let's make this difference :
>
> if($picture) { ## If possible of course
> open(F, ">$path/$number/$foto") || die "Cannot open $!";
>
> Now what do you want to store into this file.
> You opened the file in overwritemode so you can never read input from it.
> The notation would be incorrect by then, but that doesn't matter now.
> I've never heard of a while($file) unless you substitute $file that makes it changing
> But I don't think this is what you want.
>
> while(<AnotherFH>) { ## Maybe ??
> print F $_;
> }
>
> Can you please explain where you get your input from and what it contains.
> Where you want to store it.
>
The script reads the input from a form. The input could be text, sound
or a picture. All the input is supposed to be stored in
$path/$number/Text, $path/$number/Sound and $path/$number/Images.
>
> Regs David
> >
> > Hello!
> >
> > The following part of code uploads 0k.
> >
> > #!/usr/bin/perl
> >
> > ...
> >
> > if($foto) {
> > open (F, ">$path/$number/$foto") || die "Cannot open $!";
> > while(<$foto>) {
> > print F $_;
> > }
> > close F;
> > }
> >
> > Where could be the problem?
> >
> > Please help,
> > Collette.
> >
> >
> >
> >
> > --
> > To unsubscribe, e-mail: [EMAIL PROTECTED]
> > For additional commands, e-mail: [EMAIL PROTECTED]
> >
> >
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
