<div>hi!xiyu lu,</div>
<div>&nbsp;&nbsp; 正则应该有方法实现，不过一时没想起来呵呵，不过 TIMTOWTDI 嘛，有很多方法的：</div>
<div><font size="2">
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid"><font size="2">
<p>#!/usr/bin/perl -W<br># cnhacktnt {AT} <a href="http://perlchina.org">perlchina.org</a><br>use strict;</p>
<p>my $pattern = &quot;RRWWXXWW&quot;;<br>my $char = &quot;X&quot;;<br>my $string = &quot;11001010&quot;;<br>print $pattern,&quot;\n&quot;;<br>substr( $string,pos( $pattern )-1,1 )=$char while ( $pattern=~ m/$char/g );<br>
print $string;<br></p></font></blockquote></font></div>
<div>如上的代码应该能很好的完成任务，enjoy :-)<br><br>&nbsp;</div>
<div><span class="gmail_quote">On 2/17/06, <b class="gmail_sendername">xiyu lu</b> &lt;<a href="mailto:phoeneer@gmail.com">phoeneer@gmail.com</a>&gt; wrote:</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">
<div style="DIRECTION: ltr">谢谢, 我的问题是对于一个字符串&quot;RRWWXXWW&quot;, 根据取其中'X'的字符的位置,替换另一个字符串&quot;11001010&quot;中相应位置的字符为'X', 替换后的字符串变成&quot;1100XX10&quot;, 不过我已经用split/join的方式将它转换然后比较了.我想知道在s/pattern/replacement中是否可以通过正则表达式简单实现? 还是只能通过这样转换的方式实现? 
<br>&nbsp;</div></blockquote></div>