$ perl -le '$_="

good

";s///g;print'

good