- or download this
20:29: beretboy: s/ttt/tt/g;
20:34: alienhuman: /o would make that more efficient :)
- or download this
$\="\n";
$_='aaa';
...
print "$c:$_" while s/$c/$c++/oe;
print "------";
print "$c:$_";
- or download this
a:aaa
------
...
d:bcd
------
e:bcd
- or download this
a:aaa
------
b:aaa
------
b:aaa
- or download this
a:aaa
------
...
e:eaa
f:faa
.....
- or download this
21:45: alienhuman: /o would make that more efficient :)