Phrase reversals: Difference between revisions
Content added Content deleted
No edit summary |
(→{{header|REXX}}: added version 2.) |
||
Line 554: | Line 554: | ||
=={{header|REXX}}== |
=={{header|REXX}}== |
||
===version 1=== |
|||
Working with REXX (strings and words) is trivial. |
Working with REXX (strings and words) is trivial. |
||
<lang rexx>s='rosetta code phrase reversal' |
<lang rexx>s='rosetta code phrase reversal' |
||
Line 576: | Line 577: | ||
each word reversed : attesor edoc esarhp lasrever |
each word reversed : attesor edoc esarhp lasrever |
||
word-order reversed : reversal phrase code rosetta</pre> |
word-order reversed : reversal phrase code rosetta</pre> |
||
===version 2=== |
|||
<lang rexx>/*REXX pgm reverses words and/or letters in a string in various ways. */ |
|||
i=; p=; parse arg $; if $='' then $="rosetta code phrase reversal" |
|||
do j=1 for words($); _=word($,j) |
|||
i=i reverse(_) ; p=_ p |
|||
end /*j*/ |
|||
say ' the original phrase used: ' $ |
|||
say ' original phrase reversed: ' reverse($) |
|||
say 'reversed individual words: ' strip(i) |
|||
say 'reversed words in phrases: ' p /*stick a fork in it, we're done.*/</lang> |
|||
'''output''' when using the default string: |
|||
<pre> |
|||
the original phrase used: rosetta code phrase reversal |
|||
original phrase reversed: lasrever esarhp edoc attesor |
|||
reversed individual words: attesor edoc esarhp lasrever |
|||
reversed words in phrases: reversal phrase code rosetta |
|||
</pre> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |