Package: perl
Version: 5.10.0-9.1

This looks like we want to fix it for lenny.

----- Forwarded message from David Landgren <[EMAIL PROTECTED]> -----

Mailing-List: contact [EMAIL PROTECTED]; run by ezmlm
list-help: <mailto:[EMAIL PROTECTED]>
list-unsubscribe: <mailto:[EMAIL PROTECTED]>
list-post: <mailto:[EMAIL PROTECTED]>
X-List-Archive: <http://nntp.perl.org/group/perl.perl5.porters/136631>
List-Id: <perl5-porters.perl.org>
From: David Landgren <[EMAIL PROTECTED]>
To: Gisle Aas <[EMAIL PROTECTED]>
CC: Perl 5 Porters <[EMAIL PROTECTED]>
Subject: Re: File::Path::mkpath() incompatiblity in perl-5.10

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.

That's my fault. I'll see if I can make it figure out how to do the 
right thing. In the meantime,

  mkpath(["foo"], !shift, 0755);

will get you through the night.

Sorry about that,
David


----- End forwarded message -----



-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to