Just another update

Task/Substring-Top-and-tail/Clojure/substring-top-and-tail.clj

@@ -0,0 +1,15 @@
+; using substring:
+user=> (subs "knight" 1)
+"night"
+user=> (subs "socks" 0 4)
+"sock"
+user=> (.substring "brooms" 1 5)
+"room"
+
+; using rest and drop-last:
+user=> (apply str (rest "knight"))
+"night"
+user=> (apply str (drop-last "socks"))
+"sock"
+user=> (apply str (rest (drop-last "brooms")))
+"room"

Task/Substring-Top-and-tail/NewLISP/substring-top-and-tail.newlisp

@@ -0,0 +1,7 @@
+(let (str "rosetta")
+  ;; strip first char
+  (println (1 str))
+  ;; strip last char
+  (println (0 -1 str))
+  ;; strip both first and last characters
+  (println (1 -1 str)))

Task/Substring-Top-and-tail/REXX/substring-top-and-tail.rexx

@@ -1,5 +1,4 @@
 /*REXX program to show removal of 1st/last/1st&last chars from a string.*/
-
 z = 'abcdefghijk'
 
 say '                  the original string =' z

Task/Substring-Top-and-tail/Ruby/substring-top-and-tail.rb

@@ -2,3 +2,4 @@ puts "knight"[1..-1]   # strip first character
 puts "socks"[0..-2]    # strip last character
 puts "socks".chop      # alternate way to strip last character
 puts "brooms"[1..-2]   # strip both first and last characters
+puts "与今令"[1..-2]    # => 今