字符串替换求助

iamxesam

我有一个字符串如下：$str="A011023022";
替换的规则如下：
        A0=>"AA",
        A1=>"AC",
        A2=>"AG",
        A3=>"AT",
        C0=>"CC",
        C1=>"CA",
        C2=>"CT",
        C3=>"CG",
        G0=>"GG",
        G1=>"GT",
        G2=>"GA",
        G3=>"GC",
        T0=>"TT",
        T1=>"TG",
        T2=>"TC",
        T3=>"TA"
即先读取$str的前两个字符“A0”，替换为“AA".现在字符串变成$str="AA11023022"
然后读取$str的字符“A1”，替换为“AC".现在字符串变成$str="AAC1023022"
读取$str的字符“C1”，替换为“CA".现在字符串变成$str="AACA023022"
依次类推。。。
除了用循环外，有没有更简便的方法呢？

guap514

不用循环 挺麻烦的~~~

1. 1 while($str =~ s/([ACGT][0123])/$hash{$1}/);

复制代码

wind_ch

"不用循環" 直接給我整蒙了.

貌似2樓也循環了

yybmsrs

是啊   while也是循环

toniz

{:3_186:}不用循环 是不可能滴~~~

guap514

不用循环 是不可能滴~~~
toniz 发表于 2010-04-23 18:01

    不用循环  可以用函数递归

blackold

回复 1# iamxesam


    本身就是循环啊。

SNYH

不可能不循环吧?
至少要读取字符串的每一位才可能进行计算吧.

就算 普通  加法   在CPU里面也是"循环" (理论而言)

SNYH

不用循环 挺麻烦的~~~
guap514 发表于 2010-04-23 17:25

连续写5次正则替换 就可以很邪恶的去掉 while 了.