Regex

[Anon]

Can anybody help me with this quick query?

I've got a word (this ones made up) "susspenssettive"

I need to find all the s's all the t's etc but it needs to work for any character.

I've tried
$word = "susspenssettive";
ereg("(.{2})",$word,$regs)
and
ereg("([a-z]{2})",$word,$regs)

but they don't work.

I'm actually trying to replace the double letter "SS" with a single i.e. "suspensetive"
so if you could do it in ereg_replace that would be marvelous.

Thanks All,

Treefrog

[vsego]

I cannot believe this! I really cannot find a nicer way than this:

function anyDouble() {
$c = "a";
$s = "$c$c";
while ($c < "z") {
$s .= "|$c$c";
$c++;
}
return "($s)";
}

$word = "susspenssettive";
while (ereg(anyDouble(), $word, $reOut))
$word = ereg_replace($reOut[1], $reOut[1][0], $word);
echo "$word<br>\n";

My world is collapsing... :-)

[vsego]

preg_replace("/(.)\1/", "\1", $word)

[Anon]

Thanks chaps, I managed to do it like this.

while ($x < (strlen($word)-1)){
$two_chars = substr($word,$x,2);

// check if there the same i.e. "SS"
if (substr($two_chars,0,1) == substr($two_chars,1,1)){
	// they are so delete it
	$word = str_replace($two_chars, substr($two_chars,0,1),$word);
} // end if

$x++;

} // end while

But the preg_replace seems to be the best option. So I'll delete my mess ;o)

Thanks again.