Perl ファイル置換:基本と応用テクニック

Perlを使用してファイルの内容を置き換える手順は以下のとおりです:

  1. ファイルを開いて内容を読み取る
open my $file, '<', 'filename.txt' or die "Could not open file: $!";
my @lines = <$file>;
close $file;
  1. ファイルの内容を入れ替える
foreach my $line (@lines) {
    $line =~ s/old_text/new_text/g;
}
  1. ファイルに書き戻す
open my $new_file, '>', 'new_filename.txt' or die "Could not open file: $!";
foreach my $line (@lines) {
    print $new_file $line;
}
close $new_file;

Perlを使用してファイルの内容を置換することができます。ファイルの内容を置換する前に、原本をバックアップすることを忘れないでください。

bannerAds