Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re^5: How to create symlink using Perl?

by eyepopslikeamosquito (Archbishop)
on Oct 24, 2011 at 02:06 UTC ( [id://933257]=note: print w/replies, xml ) Need Help??


in reply to Re^4: How to create symlink using Perl?
in thread How to create symlink using Perl?

I tried with active perl version 5.8.8 and the Win32::Symlink module got installed. But it created only directory junction despite passing a file.
To (hard) link a file on Windows, you don't need a module, just use the built-in Perl link function. For example:
link $oldfile, $newfile or die "link failed: $!";
You should only use Win32::Symlink for directories, not files. That's because Windows junctions are for directories only; see Hard Links and Junctions and Creating Symbolic Links and Symbolic Links for details.

As for the Win32::Symlink 0.04 PPM failures you mentioned, I just tried building it from source and it failed to compile due to an incompatibility with struct REPARSE_DATA_BUFFER between Win32::Symlink and the Microsoft header files, so I just raised a ticket #71879. BTW, I was able to get it to build simply by hacking tclreadlink.c, changing REPARSE_DATA_BUFFER to MY_REPARSE_DATA_BUFFER.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://933257]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others meditating upon the Monastery: (3)
As of 2024-03-29 01:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found