在Perl中,可以使用File::Copy
模塊中的copy
函數來復制文件。copy
函數的語法如下:
copy(source_file, destination_file)
其中,source_file
為要復制的源文件路徑,destination_file
為要復制到的目標文件路徑。
下面是一個示例代碼,演示了如何使用copy
函數復制文件:
use File::Copy;
my $source_file = "path/to/source/file.txt";
my $destination_file = "path/to/destination/file.txt";
copy($source_file, $destination_file) or die "Copy failed: $!";
print "File copied successfully.\n";
在上面的示例中,我們首先使用use File::Copy
導入File::Copy
模塊,然后定義了源文件的路徑和目標文件的路徑。接下來,調用copy
函數來復制文件,如果復制失敗,則輸出錯誤信息。最后,輸出一條成功復制的消息。
注意,使用copy
函數需要確保源文件和目標文件的路徑都是有效的,并且對于目標文件的目錄,當前用戶具有寫入權限。