September 2017 Update

Task/Strip-comments-from-a-string/Kotlin/strip-comments-from-a-string.kotlin

@@ -0,0 +1,15 @@
+// version 1.0.6
+
+val r = Regex("""(/\*.*\*/|//.*$)""")
+
+fun stripComments(s: String) = s.replace(r, "").trim()
+
+fun main(args: Array<String>) {
+    val strings = arrayOf(
+        "apples, pears // and bananas",
+        "   apples, pears /* and bananas */",
+        "/* oranges */ apples // pears and bananas  ",
+        " \toranges /*apples/*, pears*/*/and bananas"
+    )
+    for (string in strings) println(stripComments(string))
+}

Task/Strip-comments-from-a-string/Sed/strip-comments-from-a-string.sed

@@ -0,0 +1,3 @@
+#!/bin/sh
+# Strip comments
+echo "$1" | sed 's/ *[#;].*$//g' | sed 's/^ *//'

Task/Strip-comments-from-a-string/Zkl/strip-comments-from-a-string-1.zkl

@@ -0,0 +1,8 @@
+fcn strip(text,c){  // if c in text, remove it and following text
+   if (Void!=(n:=text.find(c))) text=text[0,n];
+   text.strip()		// remove leading and trailing white space
+}
+fcn stripper(text,a,b,c,etc){ // strip a,b,c,etc from text
+   foreach c in (vm.arglist[1,*]){ text=strip(text,c) }
+   text
+}

Task/Strip-comments-from-a-string/Zkl/strip-comments-from-a-string-2.zkl

@@ -0,0 +1,6 @@
+fcn stripper(text,a,b,c,etc){
+   vm.arglist[1,*].reduce('wrap(text,c){
+      if (Void!=(n:=text.find(c))) text[0,n] else text
+   },text)
+   .strip()
+}

Task/Strip-comments-from-a-string/Zkl/strip-comments-from-a-string-3.zkl

@@ -0,0 +1,2 @@
+String(">", strip(" apples, pears # and bananas","#"), "<").println();
+String(">", stripper(" apples, pears ; and # bananas","#",";"), "<").println();