問題

次のようにperlで単純な正規表現を置き換える場合:

 ($line =~ s/JAM/AAA/g){
 

マッチを見て置き換えを一致させるように変更するにはどうすればよいですか?

'JAM'は 'AAA'になります 「ジャム」は「ああ」になります

  ベストアンサー

 $line =~ s/JAM/{$& eq 'jam' ? 'aaa' : 'AAA'}/gie;
 

  同じタグがついた質問を見る

regexperlreplacecase