Phrase reversals: Difference between revisions
=={{header|Racket}}== implementation added
(→Tcl: Added implementation) |
(=={{header|Racket}}== implementation added) |
||
Line 240:
'reversal phrase code rosetta'
>>> </lang>
=={{header|Racket}}==
<lang racket>#lang racket/base
(require
(only-in srfi/13 string-reverse)
(only-in racket/string string-split string-join))
(define (phrase-reversal s)
(list
(string-reverse s)
(string-join (map string-reverse (string-split s)))
(string-join (reverse (string-split s)))))
(for-each displayln (phrase-reversal "rosetta code phrase reversal"))</lang>
{{out}}
<pre>lasrever esarhp edoc attesor
attesor edoc esarhp lasrever
reversal phrase code rosetta</pre>
=={{header|Ruby}}==
| |||