Perl link()函數

perl link()函數例子，link()函數學習，link()函數實例代碼，link()函數教學等

語法

link OLDFILE,NEWFILE

定義和用法

創建一個新的文件名，創建一個NEWFILE的文件，鏈接到文件OLDFILE。該函數創建一個硬鏈接；如果你想要一個符號鏈接，那麼使用符號鏈接的函數。

返回值

0 - 失敗；

1 - 成功；

例子

試試下麵的例子：這將使用現有的文件創建新的文件。

#!/usr/bin/perl
#by www.gitbook.net

$existing_file = "/uer/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";
}