perlのキャプチャ文字列の置換処理

Question

以下の置換処理で正規表現でキャプチャした「$1」部分のテキストを加工してから
置き換えたいのです。やり方を教えていただけると助かります。

$text = "＜テスト文字列＞";
$text =~ s/＜(.*?)＞/<$1>/g;

Answer 1

eオプションについて調べてみてください。

sub myfunc{
  my($x)=@_;
# ここで$xに対して何らかの処理を行って結果を$yに入れておく。
  return($y);
}

$text = "＜テスト文字列＞";
$text =~ s/＜(.*?)＞/myfunc($1)/eg;

Comments

[yookoko]

丁寧な回答のありがとうございます。

Answer 2

hogehoge という文字列を　xxx という文字列にするためには
どの様に、正規表現を記載すればよいでしょうかと具体的に
記載されたほうが、回答もくるとおもいます。

Comments

[yookoko]

やりたいことは正規表現でキャプチャした$1に対してさらに置換処理をかけたいです。2重で処理したいです。