Perl

Create Symbolic Link

See more FileAccess Examples

Demonstrates how to create a symbolic (soft) link.

Note: This example requires Chilkat v9.5.0.77 or greater.

Perl

use chilkat();

$success = 0;

# Chilkat supports symbolic links on both Windows and non-Windows operating systems.
# Note: On Windows, symbolic links and Windows shortcuts are two different things.
# On the Windows operating system, a process requires a special privilege to create
# a symbolic link (unless running as administrator).  

$fac = chilkat::CkFileAccess->new();

# Here we create a symbolic link to point to qa_data/hamlet.xml
# 
$target = "qa_data/hamlet.xml";
$symlink = "qa_output/symlink_hamlet.xml";
$success = $fac->SymlinkCreate($target,$symlink);
if ($success != 1) {
    print $fac->lastErrorText() . "\r\n";
    exit;
}

# Here we create a directory symbolic link.  The target is a directory (not a regular file)
$target = "qa_data/xml/";
$symlink = "qa_output/xml_dir";
$success = $fac->SymlinkCreate($target,$symlink);
if ($success != 1) {
    print $fac->lastErrorText() . "\r\n";
    exit;
}

print "Success." . "\r\n";