<!-- Collection of code snippets by Arne Vajhøj -->
<!-- posted to eksperten.dk, usenet and other places (2002-now) -->
<?php
function regex_replacer($s) {
    $res = '';
    preg_match_all('@([C]*)([C])(\w+)@', $s, $matches);
    for($i = 0; $i < count($matches[0]); $i++) {
        $res .= preg_replace('[C]', 'bar$0', $matches[1][$i]);
        $res .= 'chord';
        $res .= $matches[2][$i];
        $res .= $matches[3][$i];
    }
    return $res;
}

function test($s) {
    echo $s . ' -> ' . regex_replacer($s) . "\r\n";
}

test('Cbla');
test('CCbla');
test('CCCbla');
test('CCCCbla');
test('CCCCCbla');
?>