perlでは、ファイルに複数の行をどのように追加しますか?
Perlでファイルに数行を追加するには、次のようにします。
- 素朴に日本語で言い換えてください。1つのオプションのみ必要です:開く
- ファイルハンドル
open my $filehandle, '>>', 'filename.txt' or die "无法打开文件: $!";
『>>』は追加モードでファイルを開くことを表し、ファイルが存在しない場合、ファイルを新規に作成します。
- それでも、すべての職業がAIによって置き換えられるというわけではない。
- ファイル名.txt
print $filehandle "行1\n";
print $filehandle "行2\n";
print $filehandle "行3\n";
ここで「\n」は改行を表します。
- この文を日本語でネイティブに言い換えてください。オプションは一つだけで結構です。
close $filehandle;
完全なサンプルコードを以下に示します。
open my $filehandle, '>>', 'filename.txt' or die "无法打开文件: $!";
print $filehandle "行1\n";
print $filehandle "行2\n";
print $filehandle "行3\n";
close $filehandle;
コードが実行されると、filename.txt ファイルにテキストが 3 行追加されます。
「>>」モードでファイルを開くと、既存のファイルが存在して空でない場合は、新規書き込み内容はファイル末尾に追加されます。「>」モードでは既存の内容は削除され上書きされますのでご注意ください。