echo 'abbc' | perl -pe "s,b,{\"-\"},ge" # a--c