Gisle Aas wrote: > I had some production code using File::Path::mkpath() that started to > misbehave after upgrading to perl-5.10. The bug is demonstrated with > the following script: > > #!/usr/bin/perl > use File::Path qw(mkpath); > print "$File::Path::VERSION\n"; > mkpath("foo", !shift, 0755); > rmdir("foo"); > > This script will create a directory called "493" in the current > directory if invoked with 1 as argument. This did not happen with > perl-5.8 and earlier. This took a while to replicate because the bug only manifests itself if the working directory is empty. Without looking at the code I can't imagine why that would be. Fix forthcoming. Thanks, DavidThread Previous | Thread Next