This is maybe not your only error.
Of course you have to store contents of a directory like :
sub getfiles {
opendir(DIR, $base) or die "can't open $base : $!";
my @files = grep !/^\.\.?$/, readdir(DIR); # Extract the . and .. file
closedir(DIR);
} # End sub getfiles
But if you created the
bss96kci wrote at Wed, 26 Jun 2002 08:52:17 +0200:
> Hello!
> (2)
> $path="/data/homewww/../balginst/Bilder";
> open(DIR, ">$path.$fname") or die
> binmode(DIR);
>
> The code writes data in the directory balginst and always writes Bilder and
>Bilder.$fname. When I
> write $path/$fname, I get an
