文字列内の各単語を逆順に並べ、句読点と大文字を最初の場所に保持しながら、文字数が最小のプログラムを作成します。

「単語の順序」とは、各単語が空のスペース（ ""）で分割されていることを意味するため、短縮などは1つの単語として扱われます。収縮のアポストロフィは同じ場所にとどまる必要があります。（「しない」=>「いいえ」）。

（句読点は、a〜z、A〜Z、または空白*以外の文字を意味します）。

• 大文字の番号を使用できないため、このリストから番号が削除されました。数字は句読点として扱われるようになりました。

たとえば、入力の場合：

Hello, I am a fish.

出力されるはずです：

Olleh, I ma a hsif.

Hは以前は同じ場所で大文字だったため、最初の単語の最初の文字であるOが大文字になっていることに注意してください。

コンマとピリオドも同じ場所にあります。

その他の例：

This; Is Some Text!

出力します

Siht; Si Emos Txet!

任意の言語を使用できます。キャラクターの数が最も少ないプログラムが勝ちます。

GolfScript、58 54 48文字

" "/{.{65- 223&26<}:A,\{.A{96&\)31&@+}*}%+}%" "*

これは、かなり長くなったGolfScriptソリューションです。多くのコードは、文字がa-zA-Zにあるかどうかを実際に検出しています。誰かがそれをテストするさらに短い方法を見つけることができるかもしれません。

オンラインでコードを試すことができます。例：

> Hello, I am fish.
Olleh, I ma hsif.

> This; Is Some Text!
Siht; Si Emos Txet!

> Don't try this at home.
Tno'd yrt siht ta emoh.

APL 69

t←⍞を介して画面入力を受け取ります

⎕av[1↓∊(↑¨v),¨((¯1×⌽¨z)+z←¯32×~1↓¨v>97)+¨⌽¨1↓¨v←(+\v<66)⊂v←0,⎕av⍳t←⍞]

コーヒースクリプト、 134 133文字

alert prompt().replace /\S+/g,(x)->c=x.match r=/[a-z]/gi;return x.replace r,(y)->return c.pop()[`(y<"a"?"toUpp":"toLow")`+"erCase"]()

Coffeescriptは（コードゴルフの目的で）javascriptのわずかに密度の高いバージョンです。三項演算子はありませんが、javascriptへのエスケープがあります。

JavaScriptバージョンは次のとおりです。

Javascript、 152 151文字

alert(prompt().replace(/\S+/g,function(x){c=x.match(r=/[a-z]/gi);return x.replace(r,function(y){return c.pop()[(y<"a"?"toUpp":"toLow")+"erCase"]()})}))

インデント：

alert(prompt().replace(/\S+/g,function(x){
  c=x.match(r=/[a-z]/gi);
  return x.replace(r, function(y){
    return c.pop()[(y<"a"?"toUpp":"toLow")+"erCase"]()
  })
}))

Ruby：89文字（-pスイッチの1文字を含む）

Jan DvorakのCoffeeScriptソリューションをコピーしませんでしたが、多くの試みの後、私のコードは正確なコピーのように見えました。おそらく無意識の声が「白いウサギのヤン・ドヴォルザークに続いて」とささやき続けました。したがって、アルゴリズムの賛成票は彼の答えに行くべきです。

$_.gsub!(/\S+/){|m|l=m.scan r=/[a-z]/i;m.gsub(r){|c|l.pop.send c<?a?:upcase: :downcase}}

サンプル実行：

bash-4.2$ ruby -p reverse-word.rb <<< "Hello, I am a fish.
This; Is Some Text!
Don't touch that!
S'm00ch1e"
Olleh, I ma a hsif.
Siht; Si Emos Txet!
Tno'd hcuot taht!
E'h00cm1s

ルア、143

print(((io.read"*l"):gsub("%w+",function(s)local r=""for i=1,#s do r=("")[s:byte(-i)>96 and"lower"or"upper"](s:sub(i,i))..r end return r end)))

EcmaScript 6（112文字）

入力はで提供されsます。

alert(s.replace(/\S+/g,x=>(_=x.match(X=/[a-z]/gi),x.replace(X,a=>_.pop()[(a<"a"?"toUpp":"toLow")+"erCase"]()))))

@Jan Dorvakの回答に基づきます。

C＃（375）

 public static string rev(string s)
    {
        var r = new Regex("[^A-za-z]");

        var result = "";
        var token = "";
        foreach (var c in s)
        {
            if (!r.IsMatch(c + ""))
            {
                token += c;
            }
            else
            {
                result += new string(token.Reverse().ToArray());
                result += c;
                token = "";
            }
        }

        var arr = result.ToArray();
        int i = 0;
        foreach (var c in s)
        {
            arr[i] = char.IsUpper(c) ? char.ToUpper(arr[i]) : char.ToLower(arr[i]);
            i++;
        }

        result = new string(arr);
        return result;
    }

縮小

public static string rev(string s){var r=new Regex("[^A-za-z]");var result="";var token="";foreach(var c in s){if(!r.IsMatch(c+"")){token+=c;}else{result+=new string(token.Reverse().ToArray());result+=c;token="";}}var arr=result.ToArray();int i=0;foreach(var c in s){arr[i]=char.IsUpper(c)?char.ToUpper(arr[i]):char.ToLower(arr[i]);i++;}result=new string(arr);return result;}