Anonymous user
Phrase reversals: Difference between revisions
Adds Clojure solution
(Adds Clojure solution) |
|||
Line 347:
Original word order reversed : reversal phrase code rosetta
</pre>
=={{header|Clojure}}==
<lang clojure>(use '[clojure.string :only (join split)])
(def phrase "rosetta code phrase reversal")
(defn str-reverse [s] (apply str (reverse s)))
; Reverse string
(str-reverse phrase)
; Words reversed
(join " " (map str-reverse (split phrase #" ")))
; Word order reversed
(apply str (interpose " " (reverse (split phrase #" "))))
</lang>
{{out}}
<pre>"lasrever esarhp edoc attesor"
"attesor edoc esarhp lasrever"
"reversal phrase code rosetta"</pre>
=={{header|D}}==
| |||