替换n个0中的第3个怎么替换

kairi

000000替换为003000

Lonki

s/000/003/

or

s/(?<=00)0/3/

[ 本帖最后由 Lonki 于 2007-9-26 17:51 编辑 ]

kairi

汉个要是替换第100000个0呢。。。
有没有好用点的办法

perljoker

使用{}
s/?<=0{100000}0/3/g

kairi

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. my $a=000000;
   
7. $a=~s/?<=0{3}0/3/g;
   
8. print $a;
   

复制代码

报错：
Quantifier follows nothing in regex; marked by <-- HERE in m/? <-- HERE <=0{3}0/ at Untitled line 6

Lonki

原帖由 kairi 于 2007-9-26 18:18 发表

#!/usr/bin/perl
use strict;
use warnings;

my $a=000000;
$a=~s/?

(?<=)是一个完整语法

s/(?<=0{2})0/3/

[ 本帖最后由 Lonki 于 2007-9-26 18:27 编辑 ]

perljoker

原帖由 Lonki 于 2007-9-26 18:26 发表




(?

谢谢纠正，忘了呵呵，这个我用的少

kairi

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. my $a="000000";
   
7. $a=~s/(?<=0{2})0/3/;
   
8. print $a;
   

复制代码

昨天有事没上搞完了谢谢大家哈