Select Code to Download

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

  ABC
  DEF

  perl -e '$_="ABC\nDEF";s/C\nD/-/;print'

  ABC-DEF