Reverse words in a string: Difference between revisions
Content added Content deleted
m (Fixed the XBS example) |
No edit summary |
||
Line 1,863: | Line 1,863: | ||
----------------------- Robert Frost |
----------------------- Robert Frost |
||
</pre> |
</pre> |
||
=={{header|Ksh}}== |
|||
<lang ksh> |
|||
#!/bin/ksh |
|||
# Reverse words in a string |
|||
# # Variables: |
|||
# |
|||
typeset -a wArr |
|||
integer i |
|||
###### |
|||
# main # |
|||
###### |
|||
while read -A wArr; do |
|||
for ((i=${#wArr[@]}-1; i>=0; i--)); do |
|||
printf "%s " "${wArr[i]}" |
|||
done |
|||
echo |
|||
done << EOF |
|||
---------- Ice and Fire ------------ |
|||
fire, in end will world the say Some |
|||
ice. in say Some |
|||
desire of tasted I've what From |
|||
fire. favor who those with hold I |
|||
... elided paragraph last ... |
|||
Frost Robert ----------------------- |
|||
EOF</lang> |
|||
{{out}}<pre> |
|||
------------ Fire and Ice ---------- |
|||
Some say the world will end in fire, |
|||
Some say in ice. |
|||
From what I've tasted of desire |
|||
I hold with those who favor fire. |
|||
... last paragraph elided ... |
|||
----------------------- Robert Frost </pre> |
|||
=={{header|Lambdatalk}}== |
=={{header|Lambdatalk}}== |