描述
此函数创建一个新文件名 NEWFILE,链接到文件 OLDFILE。该函数创建一个硬链接;如果需要符号链接,请使用 symlink 函数。
用法
以下是此函数的简单语法 -
link OLDFILE,NEWFILE
返回值
此函数在失败时返回 0,成功时返回 1。
示例
以下是显示其基本用法的示例代码,这将使用现有文件创建新文件 -
#!/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
相关用法
- Perl listen用法及代码示例
- Perl localtime用法及代码示例
- Perl length()用法及代码示例
- Perl log用法及代码示例
- Perl last用法及代码示例
- Perl length用法及代码示例
- Perl lcfirst()用法及代码示例
- Perl lstat用法及代码示例
- Perl log()用法及代码示例
- Perl local用法及代码示例
- Perl sin()用法及代码示例
- Perl abs()用法及代码示例
- Perl kill用法及代码示例
- Perl chop()用法及代码示例
- Perl wantarray用法及代码示例
- Perl gmtime用法及代码示例
注:本文由纯净天空筛选整理自 Perl link Function。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。