Re^2: Five Ways to Reverse a String of Words (C#, Perl 5, Perl 6, Ruby, Haskell)

[sgt]

not too sure about ash but you get less chars with:

 print "${new% }"

another way showing off some aspects of modern shells but still a bit longish...

% stephan@labaule (/home/stephan) %
% cat rev.sh
#!/bin/ksh93

function rev
{
  nameref s=$1; typeset a=( $s ); integer n=${#a[*]} i; s=; n=n-1
  for i in {$n..0}; do s+="${a[i]} "; done; s=${s%?}
}


s="   one  two three   four "
rev s
print "[$s]"

% stephan@labaule (/home/stephan) %
% ksh93 rev.sh
[four three two one]

enjoy ;) --steph