RosettaCodeData/Task/Strip-comments-from-a-string/Emacs-Lisp/strip-comments-from-a-string.el

(string-trim (string-trim-right " apples, pears # and bananas" "[#;].+"))

(string-trim (string-trim-right " apples, pears ; and bananas" "[#;].+"))

(string-trim (string-trim-right " apples, pears and bananas " "[#;].+"))