perl -e '$_="ABC\nDEF";s/C$^D/-/m;print'
  perl -e '$_="ABC\nDEF";s/C$\n^D/-/m;print'