File::Next and Windows Junctions (Reparse Points)

[Vladmaster99]

Hello Andy and users of File:;Next.
My question is should we add code to handle Windows Junctions ie Skip them like symbolic Link inside if ^o=='Win32' block . Or Should I just fork File::Next to File::Win32::Next. I would like anybodies feedback on which would be preferable? P.S. I have sent my quick and dirty code version of File::Win32::Next which I have tested on Windows Vista, Windows 7, and Windows 10. Thanks for any feedback.
Cheers all
James P

[petdance]

Can you please post a PR or even a set of diffs here to this ticket so we can see what you're talking about?

[Vladmaster99]

Will post a Html diff after Taekwondo. Will also add If ^o=='win32' around win32 specific code. Cheers
will zip html diff, file::win32::next.pm and my version of file;:next and an example program using file::win32::next. Sorry for delay ..

[Vladmaster99]

P.S Sorry that my pm and pl files use Whitesmiths indent format. For any irritated K&R indent lovers. Perl::tidy will K&R reformat if you wish

[Vladmaster99]

perltidy html output with my changes with a aqua background (in Whitesmiths indent format). My file shows a large number of differences to original next.pm due to indent format being different, HAVE NOT highlighted differences due to indentation. I am testing my code additions wrapped in if $^o=='Win32' on a couple of different Windows operating systems . Will post tomorrow with an example next.pm.
FileWinNext.zip

[Vladmaster99]

Opps did not mean to close this Enhancement Issue

[Vladmaster99]

Sorry for delay have been a little busy here is an example file::next.pm. Has been tested Vista,Win7 and Win 10
Next.zip
Andy have a look at it and see what you think. Do you wish for me to highlight differences in code like I did above in a previous post. The changes are in side of

 if ($^O eq 'MSWin32') 
     {
        .....
    }

blocks