echo dc | perl -pe 's/(?<!a)((b)*c)/x$1/'
dxc