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

kairi

1^# kairi 发表于 2007-09-26 17:36

000000替换为003000

Lonki

2^# Lonki 发表于 2007-09-26 17:50

s/000/003/

or

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

kairi

3^# kairi 发表于 2007-09-26 17:56

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

perljoker

4^# perljoker 发表于 2007-09-26 18:05

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

kairi

5^# kairi 发表于 2007-09-26 18:18

[Copy to clipboard] [ - ]

CODE:

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

my $a=000000;
$a=~s/?<=0{3}0/3/g;
print $a;

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

Lonki

6^# Lonki 发表于 2007-09-26 18:26

QUOTE:

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

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

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

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

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

perljoker

7^# perljoker 发表于 2007-09-26 18:42

QUOTE:

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

(?

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

kairi

8^# kairi 发表于 2007-09-28 10:04

[Copy to clipboard] [ - ]

CODE:

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

my $a="000000";
$a=~s/(?<=0{2})0/3/;
print $a;

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