Or using substr to insert a string between two characters:

$_ = 0;
substr $str, $_ + 1, 0, '/' while ($_ = index $str, 'CO', $_) > -1;
[download]