在 Perl 中,可以使用 print
函數將結果輸出到文件中。首先需要使用 open
函數打開一個文件,然后使用 print
函數將結果輸出到文件中,最后使用 close
函數關閉文件。
下面是一個示例代碼:
# 打開文件
open(my $file, '>', 'output.txt') or die "無法打開文件:$!";
# 輸出結果到文件
print $file "Hello, World!\n";
print $file "這是輸出的結果\n";
# 關閉文件
close($file);
在上述示例中,open
函數使用三個參數:文件句柄 $file
,打開模式 >
(表示寫入模式),以及文件名 output.txt
。如果文件無法打開,會輸出錯誤信息并終止程序運行。
然后,使用 print
函數將結果輸出到文件中。在上述示例中,分別輸出了兩行內容。
最后,使用 close
函數關閉文件。
執行以上代碼后,會在當前目錄下生成一個名為 output.txt
的文件,并將結果輸出到該文件中。