use if $^O eq 'MSWin32', 'Win32::Symlink'; [download]
In reply to Re^2: How to create symlink using Perl? by ikegami in thread How to create symlink using Perl? by reddevil