Skip Menu |

This queue is for tickets about the File-Copy-Recursive CPAN distribution.

Report information
The Basics
Id: 20245
Status: resolved
Priority: 0/
Queue: File-Copy-Recursive

People
Owner: Nobody in particular
Requestors: ash [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Critical
Broken in: 0.24
Fixed in: 0.25



Subject: PFSCheck and Win32
stat on Win32 (running under ActivePerl 5.8.8.817.90) returns 0 for inode field - therefore samecheck always fails when $_[0] and $cur exist. As far as i can see there is no real solution for this under Win32. Symlinking is almost impossible under win32 (on NTFS directories can be linked, but i am unsure how to detect this) Temprorary work around is: $File::Copy::Recursive::CopyLoop = 1; $File::Copy::Recursive::PFSCheck = 0; Solution: Maybe a return if $^O eq 'MSWin32'; at start of samecheck sub? Cheers Ash
On Sun Jul 02 17:07:25 2006, guest wrote: Show quoted text
> stat on Win32 (running under ActivePerl 5.8.8.817.90) returns 0 for > inode field - therefore samecheck always fails when $_[0] and $cur exist.
Thanks, I've been notifed of this privatly recently as well. Show quoted text
> As far as i can see there is no real solution for this under Win32. > Symlinking is almost impossible under win32 (on NTFS directories can be > linked, but i am unsure how to detect this) > > Temprorary work around is: > > $File::Copy::Recursive::CopyLoop = 1; > $File::Copy::Recursive::PFSCheck = 0;
local $File::Copy::Recursive::.... would probably be more advisable. Show quoted text
> Solution: > > Maybe a > > return if $^O eq 'MSWin32'; > > at start of samecheck sub?
I'd rather have a reliable check but I suppose that will have to do. What are you gonna do, its windows or as I like to call it "WinBlows" :) Attmpting to upload 0.25 now, let me knowhow this works out for you, thanks