string - ファイル内のすべての文字列を置換します

Question

私は文字列を持っていますtest.cgi@action=<action-name>

<action-name>任意の文字列にすることができます

<action-name>.html上記の文字列を、ファイル内のすべてのオカレンスに対して置き換えたいと思います。

Perlスクリプトを使用してこれを進める方法を教えてください。

ps: 既存のメッセージにコメントとして投稿したときに応答がありませんでした。というわけで、新規投稿として投稿します。

Answer 1

ファイルの場合は、そのまま使用できますsed(何らかの *nix プラットフォームを使用していると仮定します)。

sed 's/test.cgi@action=/.html/g' file > output

または、危険を感じている場合は、ファイルをその場で編集できます。

sed -i 's/test.cgi@action=/.html/g' file

Answer 2

use strict;
use warnings;
use 5.010;

my $string = <<'END_OF_STRING';
    test.cgi@action=xxxxxxxxxxx
    xxxxx test.cgi@action=aaaaaa
    yyyyyyyyyyytest.cgi@action=
END_OF_STRING


$string =~ s/test.cgi\@action=/.html/g;
print $string;


--output:--
    .htmlxxxxxxxxxxx
    xxxxx .htmlaaaaaa
    yyyyyyyyyyy.html