在Perl中進行文件讀寫操作主要涉及使用文件句柄(filehandle)來打開文件、讀取文件內容或寫入內容等操作。以下是一些示例代碼:
open(my $fh, '<', 'file.txt') or die "Cannot open file: $!";
while (my $line = <$fh>) {
print $line;
}
close $fh;
open(my $fh, '>', 'output.txt') or die "Cannot open file: $!";
print $fh "Hello, world!\n";
close $fh;
open(my $fh, '>>', 'output.txt') or die "Cannot open file: $!";
print $fh "Appending new content\n";
close $fh;
在以上示例代碼中,open
函數用于打開文件,參數說明如下:
die
函數用于在文件打開失敗時輸出錯誤信息并終止程序運行。close
函數用于關閉文件句柄。
需要注意的是,在 Perl 中,通常使用文件句柄來進行文件讀寫操作,可以使用 open
, close
, <
, >
, >>
等操作符來實現不同的文件操作需求。