$text = join($1, grep(/[^hello]/, split(/(\n)/, $text)));