(Perl) SFTP HardLink - Create a Hard Link using the hardlink@openssh.com Extension

Demonstrates how to create a hard link on the SFTP server using the hardlink@openssh.com extension. Note: This only works on servers supporting the hardlink@openssh.com extension.

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

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$sftp = chilkat::CkSFtp->new();

# Pass a domain or IP address..
$success = $sftp->Connect("my-sftp-server.com",22);
if ($success == 1) {
    $success = $sftp->AuthenticatePw("mySFtpLogin","mySFtpPassword");
}

if ($success == 1) {
    $success = $sftp->InitializeSftp();
}

if ($success != 1) {
    print $sftp->lastErrorText() . "\r\n";
    exit;
}

# Create a hard link on the server.
# We'll create the hard link named "somefile2.txt" in our HOME directory
# which links to the file somefile.txt also in our HOME directory.
$success = $sftp->HardLink("somefile.txt","somefile2.txt");
if ($success != 1) {
    print $sftp->lastErrorText() . "\r\n";
    exit;
}

print "Successfully created hard link." . "\r\n";