Strip comments from a string: Difference between revisions
Added Haskell.
Underscore (talk | contribs) (Added Perl.) |
Underscore (talk | contribs) (Added Haskell.) |
||
Line 78:
apples, pears
apples, pears</pre>
=={{header|Haskell}}==
<lang haskell>ms = ";#"
main = getContents >>=
mapM_ (putStrLn . takeWhile (`notElem` ms)) . lines</lang>
=={{header|Inform 7}}==
| |||