link

描述 (Description)

此函数创建一个链接到文件OLDFILE的新文件名NEWFILE。 该功能创建了一个硬链接; 如果需要符号链接，请使用符号链接功能。

语法 (Syntax)

以下是此函数的简单语法 -

link OLDFILE,NEWFILE

返回值 (Return Value)

此函数在失败时返回0，在成功时返回1。

例子 (Example)

以下是显示其基本用法的示例代码，这将使用现有文件创建新文件 -

#!/usr/bin/perl
$existing_file = "/usr/home/test1";
$new_file = "/usr/home/test2";
$retval = link $existing_file, $new_file ;
if( $retval == 1 ) {
   print"Link created successfully\n";
} else {
   print"Error in creating link $!\n";
}

执行上述代码时，会产生以下结果 -

Error in creating link No such file or directory