どのように私は式に検索し、こんにちは、私は式からサブ文字列を抽出し、後でそれにいくつかの変更を行い、このようなものを、それらを元に戻すにしたいperlの

Question

の文字列の部分にいくつかの変更を行うことができます。

((dfhkuyhu.hkjgd.hjkh + hgdfjg.uyrepo.uyu + hgdfjg.uyrepo.uyu)/(hgdfjg.uyrepo.uyu))*((khuh.jbmxcn.bnb + hgdfjg.uyrepo.uyu)/(jhxzku.kjkj.jh + hgdfjg.uyrepo.uyu)) 

と私は何かのtobeginningと、このような各部分の終わりを追加したい：

((Foo!dfhkuyhu.hkjgd.hjkh![hg] + Foo!hgdfjg.uyrepo.uyu![hg] + Foo!hgdfjg.uyrepo.uyu![hg]).[boo]/(Foo!hgdfjg.uyrepo.uyu![hg]).[boo])*((Foo!khuh.jbmxcn.bnb![hg] + Foo!hgdfjg.uyrepo.uyu![hg]).[boo]/(Foo!jhxzku.kjkj.jh![hg] + Foo!hgdfjg.uyrepo.uyu![hg]).[boo]) 

任意のアイデア？

Answer 1

のルールが少し不明であるが、あなたがFoo!/![hg]で、各文字の英数字の実行（プラス分離ドット）を囲むように、かつ).[boo]でそれぞれ閉じ括弧を交換しようとしているようです。右？

次にあなたがこれを行うことができます：

$subject =~ s/[\w.]+/Foo!$&![hg]/g; 
$subject =~ s/\)/).[boo]/g; 

説明：

s/abc/def/は、元$subject変数を変更し、 "置換文字列defとどんな正規表現abc試合代替" を意味します。

[\w.]+は、dfhkuyhu.hkjgd.hjkhのような文字列と一致します。置換文字列の$&は、一致するテキストを参照します。 /gフラグは、文字列中のすべての一致を見つけて置き換えるようにPerlに指示します。

\)は、リテラルカッコと一致します。