文字列を指定して、大文字にします。総額で私は意味conTeNT-lENgthの変更をContent-Length。例で-は、単語境界として2つの単語を含む文字列を示しました。ただし、単一の文字で区切られた任意の数の単語を境界として含む文字列のコードを記述することを期待しています。この境界は、文字列全体で変化する場合があります。

条件

1. 使用regular expressionsは許可されていません。
2. 文（文字列）には任意の数の単語を含めることができます。
3. 各単語は、あらゆるケースのEnglish文字[a-zA-Z]で構成されます。
4. 文中の異なる単語は単一の文字で区切られます。この文字はしますのみのいずれであっても-、.、<space-character>、/、&、#。文には、言及された文字以外の文字が含まれないと想定しても安全です。
5. 単語の境界は出力で保持する必要があります。
6. 最短のコードが勝ちます。

たとえば、プログラムはのBegin/With.Type&Contentために出力する必要がありますBeGin/wITH.tyPE&conTeNt。

Some test cases:
 "aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe" 
 "type&AgeNt/CC/COnteNt lEnGth#acCePT/AgeNt.RAnGe-Cc/contEnt/cODe" 
 "cc/rEspoNCe.lEngtH#tYpE-witH&UsEr/bEgIN&uSer.AGEnT&begIn/aCCEPt/Cc" 
 "lENgTH#USeR.tYpE/BeGiN&LENGth tYpe/ACCEpt#rANge/codE&AnD-ACCepT/ConTenT" 
 "contENT/ACcEpT" 
 "BeGin/wITH.tyPE&conTeNt"
 "Code.cc#User.lenGTh-USer-AND&tyPE TypE&leNgtH.tYPe usER.UseR&with" 
 "RaNgE&COnTeNT WITh CoNTENT-TypE tyPe"
 "BEgin COdE#uSeR#aGeNt.USeR"
 "TypE LENGth"

GolfScript、36 27 19文字

0\{95&+.47>32*\}%\;

仕様に従ってすべての入力に対して機能する非常に基本的なGolfScriptアプローチ。サンプルはオンラインでテストできます。

Python 3,22

print(input().title())

このコードは、stdinからの入力として文字列を受け取り、stdoutに大文字の出力を提供します。

例えば：

入力：

BEGIN/wITH.tyPe&cOnTENt

出力：

Begin/With.Type&Content

次のコードは、複数行入力用です（必要な場合）

Python 3、46

import sys
for i in sys.stdin:print(i.title())

Mathematica 62

データ

tests={"aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe","type&AgeNt/CC/COnteNt lEnGth#acCePT/AgeNt.RAnGe-Cc/contEnt/cODe","cc/rEspoNCe.lEngtH#tYpEwitH&UsEr/bEgIN&uSer.AGEnT&begIn/aCCEPt/Cc","lENgTH#USeR.tYpE/BeGiN&LENGth tYpe/ACCEpt#rANge/codE&AnD-ACCepT/ConTenT","contENT/ACcEpT","BeGin/wITH.tyPE&conTeNt","Code.cc#User.lenGTh-USer-AND&tyPE TypE&leNgtH.tYPe usER.UseR&with","RaNgE&COnTeNT WITh CoNTENT-TypE tyPe","BEgin COdE#uSeR#aGeNt.USeR","TypE LENGth"}

コード

StringReplace[ToLowerCase@#,WordBoundary~~x_:>ToUpperCase@x]&

使用法

f["aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe"]

「Agent Accept / Length-TypeユーザーRange.Type」

f /@ tests

{「Agent Accept / Length-Type User Range.Type」、
「Type＆Agent / Cc / Content Length＃Accept / Agent.Range-Cc / Content / Code」、「Cc / Responce.Length＃Type-With＆User / Begin＆User.Agent＆Begin / Accept / Cc」、「Length＃User.Type / Begin＆Length Type / Accept＃Range / Code＆And-Accept / Content」、「Content / Accept」、
「Begin / With.Type＆Content」、
「Code.Cc＃User.Length-User -And＆Type Type＆Length.Type User.User＆With "、
" Range-Content With Content-Type Type "、
" Begin Code＃User＃Agent.User "、
" Type Length "}

JavaScript（94）

prompt().split(l='').map(function(a){return l='A'>l?a.toUpperCase():a.toLowerCase()}).join('')

PHP：78 73 65 64文字

$b=ucfirst;foreach(str_split($s)as$c)echo$b($c),!$b[0]=$c<A?u:l;

入力はに渡され$sます。文字列を文字の配列として操作します。

シンプルな2ステートマシンです。文字列の字句順に依存しており、パーサーは、場合によっては文字列を入力するつもりであると自動的に仮定します。

状態は$b、次の文字で呼び出す必要がある関数の名前として格納され、表されています。ucfirst入力lcfirstが短く、単一の文字列のstrtolower/ と同じ動作をしstrtoupperます。また、1文字だけ異なるため、状態を保存するために効率的に使用できます。元のバージョンでは、状態をブール値で明示的に保存する必要がありました。

echoはブール値falseに対して何も出力しないため!、echoステートメントで割り当て（この場合は真実です）を「隠す」ためにコンマと演算子を使用しました。これにより、を削除してキャラクターを保存できました{}。

C、83

n;main(c){c=getchar();putchar(c>96?n?c:(n=c-32):c&64?n?c+32:(n=c):(n=0,c));main();}

行を取得しstdin、それらをに変換しますstdout。（好むSIGINTにEOF。）

Powershell：37-43

入力方法に応じて...

ユーザーに入力を求める：43

(Culture).TextInfo.ToTitleCase((read-host))

パイプラインから入力を取得：38

(Culture).TextInfo.ToTitleCase($input)

スクリプトの実行時に引数として入力を提供します。37

(Culture).TextInfo.ToTitleCase($args)

注：上記のスクリプトは、すべて大文字の単語を無視し、そのままにします。これを考慮する必要がある場合は、タイトルケース変換の前に入力を強制的に小文字にする必要があります。これにより、最初のメソッドに10文字が追加され、他の2つのメソッドに12文字が追加されます。

(Culture).TextInfo.ToTitleCase((read-host).ToLower())
(Culture).TextInfo.ToTitleCase("$input".ToLower())
(Culture).TextInfo.ToTitleCase("$args".ToLower())

Java-209文字

class C{
public static void main(String[]a){
for(String b:a){
char[]k=b.toLowerCase().toCharArray();
for(int i=-1;i<k.length;i++){if(i<0||"-. /&#".indexOf(k[i])>=0)k[++i]=(char)(k[i]-32);}
System.out.println(k);}}}

読みやすくするためだけに改行を追加しました。

R、143 116

少し長めのソリューションかもしれませんが、ここに行きます：

f=function(x){a=sapply(1:nchar(x),function(y)substr(tolower(x),y,y));d=c(1,which(!a%in%letters)+1);a[d]=toupper(a[d]);cat(a,sep="")}

わずかに手放して説明した：

f <- function(x){
    #Split the string in characters and "lower-case" everything
    a <- sapply(1:nchar(x),function(y)substr(tolower(x),y,y))
    #Select the first character and each character following a 
    #character that doesn't belong to lower case alphabet
    d <- c(1,which(!a%in%letters)+1)
    #Make those ones uppercase.
    a[d] <- toupper(a[d])
    #Output (stdout) while pasting them back together.
    cat(a,sep="")
    }

編集：116文字

ここでの主な課題は、ベクトル化substrです。もう少し冗長な方法があります。

f=function(x){n=1:nchar(x);a=mapply(substr,tolower(x),n,n);d=c(T,!a%in%letters);a[d]=toupper(a[d]);cat(a[n],sep="")}

インデント：

f <- function(x){
    n <- 1:nchar(x)
    a <- mapply(substr,tolower(x),n,n)
    d <- c(T,!a%in%letters) #This has been simplified as well
    a[d] <- toupper(a[d])
    cat(a[n],sep="") #Because a is now 1 char longer than x, need to subset a
    }

使用法：

> f("aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe")
Agent Accept/Length-Type User Range.Type

Befunge 98 - 24 45

~\j:'``!3*j' -;:'``b*j:'/`!3*j' +#;:,'/`!jc#@

これを書くと頭が痛い。

これは入力を受け取り~、前の文字がセパレータの1つであった場合（または前の文字がなかった場合）、実行します

:'``!3*j' -;

このスニペットは文字を取得し、そのASCII値がより大きいか等しい場合a、32を減算し、大文字に変更します。未満の場合a、3*j調整をスキップします。その後、次の部分はスキップします。この部分は、大文字から小文字への変更を処理します（次の部分とマージできると確信しています;方法がわかりません）。

:'``b*j:'/`!3*j' +#;

文字が印刷され（,）、文字が境界の1つであるかどうかがチェックされます：

'/`!

基本的に、文字をのASCII値と比較します/。文字が境界ではない場合、コードはプッシュし12、次回に大文字の調整をスキップします。#終了プログラム：をスキップし、@入力の終わりに達すると~、コード実行をに送り返し@、プログラムを終了します。

ルビー：60 51 50 47文字

$_.downcase.chars{|c|$><<$/=$/<?0?c.upcase: c}

サンプル実行：

bash-4.1$ for line in "${test[@]}"; do printf '%-75s | %s\n' "$line" "$( ruby -ne '$_.downcase.chars{|c|$><<$/=$/<?0?c.upcase: c}' <<< "$line" )"; done
aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe                                    | Agent Accept/Length-Type User Range.Type
type&AgeNt/CC/COnteNt lEnGth#acCePT/AgeNt.RAnGe-Cc/contEnt/cODe             | Type&Agent/Cc/Content Length#Accept/Agent.Range-Cc/Content/Code
cc/rEspoNCe.lEngtH#tYpE-witH&UsEr/bEgIN&uSer.AGEnT&begIn/aCCEPt/Cc          | Cc/Responce.Length#Type-With&User/Begin&User.Agent&Begin/Accept/Cc
lENgTH#USeR.tYpE/BeGiN&LENGth tYpe/ACCEpt#rANge/codE&AnD-ACCepT/ConTenT     | Length#User.Type/Begin&Length Type/Accept#Range/Code&And-Accept/Content
contENT/ACcEpT                                                              | Content/Accept
BeGin/wITH.tyPE&conTeNt                                                     | Begin/With.Type&Content
Code.cc#User.lenGTh-USer-AND&tyPE TypE&leNgtH.tYPe usER.UseR&with           | Code.Cc#User.Length-User-And&Type Type&Length.Type User.User&With
RaNgE&COnTeNT WITh CoNTENT-TypE tyPe                                        | Range&Content With Content-Type Type
BEgin COdE#uSeR#aGeNt.USeR                                                  | Begin Code#User#Agent.User
TypE LENGth                                                                 | Type Length

C＃– 110

単純な有限状態マシンベースの処理：

x.Aggregate(new{b=1>0,r=""},(s,c)=>new{b="-. /&#".Contains(c),r=s.r+(s.b?Char.ToUpper(c):Char.ToLower(c))}).r

（大文字にする場所xはどこstringですか）

もちろん、（仕様が更新された後に）退屈したい場合は、次を使用できます。

new CultureInfo(9).TextInfo.ToTitleCase(x)

または、すべての退屈なボイラープレートで：

class C{static void Main(string[]a){System.Console.WriteLine(new System.Globalization.CultureInfo(9).TextInfo.ToTitleCase(a[0]));}}

Javascript 102

prompt().split(o=q='').map(function(c){o+=(q)?c.toLowerCase():c.toUpperCase(),q=('A'>c)?0:1})
alert(o)

フォース、135

: s swap ;
: c 1 begin key dup 96 > if s if 32 - then 0 s 
else dup 64 > if s 0= if 32 + then 0 s then else 1 s then then emit again ; c

翻訳された出力はstdout、から読み取られるときに書き込まれますstdin。

Befunge-98（29）、C（65）

メソッド/アルゴリズムはほとんど同じなので、同じ投稿に両方のバージョンを含めます。どちらも、文字を小文字にするかどうかを知るために、最後の文字が記号であるか文字であるかを追跡することに依存しています。

#@~:'0` #v_,0>
',++@'% '<   ^

c,d;main(){for(;~(c=getchar());d=c>48)putchar(c<48?c:c&95|32*d);}

05AB1E、1バイト

コード：

™

説明：

™   # Implicit input which is converted to title case.

オンラインでお試しください！

Excel VBA-11文字

イミディエイトウィンドウで

?[Proper()]

VBscript

Set xlapp = CreateObject("excel.application")
wscript.echo xlapp.Evaluate("Proper(""BeGin/wITH.tyPE&conTeNt"")"

AWK、 113 103バイト

{for(;++i<=split($0,a,"");){s=a[i]
O=O (L?tolower(s):toupper(s))
L=1
if(index("-. /&#",s))L=0}print O}

これは単一行のコンテンツでは正常に機能しますが、複数行の入力ではいくつかのイニシエートを追加する必要があります

{O=""
for(L=0;++i<=split($0,a,"");){s=a[i]
O=O (L?tolower(s):toupper(s))
L=1
if(index("-. /&#",s))L=0}print O}

レコードをフィールドに自動的に分割し、そのフィールドを変更することを利用できれば便利ですが、フィールドセパレータは失われます。:(

私はこれが答えのゴルファーではないことを知っており、これはかなり古い質問ですが、AWKはCGの答え空間では過小評価されていると感じています:)

（コードをテストしてくれた@manatworkに感謝します。今は動作するはず;です。）また、フローを変更しましたが、一部を改行で置き換えることにより、バイト数を同じに保ちました。）

PHP（> v5.4.32）-25文字

<?=ucwords($a,'-. /&#')?>

説明：

• ucwords（）は組み込みのPHP関数です

• 最初のパラメーター$aは入力です

• 2番目のパラメーターはデリミターです（テストケースでアルファベット以外の文字が見つかりました）

• 使用のため、リターン/エコー/プリントが想定されます <?= ?>

リンク：

• コード遊び場

• PHP ucwords（）関数

T-SQL、179

DECLARE @T VARCHAR(MAX)='foo',@X VARCHAR(2),@ INT=0WHILE @<LEN(@T)SELECT @X=SUBSTRING(@T,@,2),@+=1,@T=STUFF(@T,@,1,IIF(@X LIKE'[a-Z]_',LOWER(RIGHT(@X,1)),UPPER(RIGHT(@X,1))))PRINT @T

SQL Server 2012でSELECTバージョンをお試しください ここ。

「foo」を入力文字列に置き換えます。文字カウントは長さゼロの文字列用です。このコードは、インデックスを使用して文字列を走査し、前の文字に基づいてその位置の文字を大文字または小文字にします。

JavaScript（Node.js）、70バイト

c=>a=>c.split``.map(b=>a="A">a?b.toUpperCase():b.toLowerCase()).join``

オンラインでお試しください！

これはさらにゴルフできると確信しています。

注意 ：

を介して入力を受け取りf(string)()、最後は必須ですが、何も実行しません。

Powershell、77 75バイト

このソリューションは、タスクルールを完全に満たしています（あいまいな例でもfoo:bar）。

-join($args|% t*y|%{"$_"|%('ToU*r','ToL*r')[+$l];$l=!('# -./&'|% Co*s $_)})

@Isziの組み込み関数ToTitleCaseを使用したPowershell ソリューションも参照してください。

テストスクリプトの説明：

$f = {

-join(
$args|% t*y|%{                   # for each char from input string
    "$_"|%('ToU*r','ToL*r')[+$l] # evaluate ToUpper or ToLower method depend on $l (lower) value
                                 # Note the variable $l is not defined for a first char
                                 # so it evaluates toUpper for the first char 
    $l=!('# -./&'|% Co*s $_)     # golfed form for $l=!'# -./&'.Contains($_) expression
                                 # =0 if the current char is specified separator (toUpper for next char)
}                                # =1 otherwise (toLower for next char)
)                                # finally, join all chars to a result string

}

@(
    ,('foo:bar'                                                                 ,'Foo:bar')
    ,('aGeNT ACcEpT/LEngTh-tYPe USeR raNgE.TyPe'                                ,'Agent Accept/Length-Type User Range.Type')
    ,('type&AgeNt/CC/COnteNt lEnGth#acCePT/AgeNt.RAnGe-Cc/contEnt/cODe'         ,'Type&Agent/Cc/Content Length#Accept/Agent.Range-Cc/Content/Code')
    ,('cc/rEspoNCe.lEngtH#tYpE-witH&UsEr/bEgIN&uSer.AGEnT&begIn/aCCEPt/Cc'      ,'Cc/Responce.Length#Type-With&User/Begin&User.Agent&Begin/Accept/Cc')
    ,('lENgTH#USeR.tYpE/BeGiN&LENGth tYpe/ACCEpt#rANge/codE&AnD-ACCepT/ConTenT' ,'Length#User.Type/Begin&Length Type/Accept#Range/Code&And-Accept/Content')
    ,('contENT/ACcEpT'                                                          ,'Content/Accept')
    ,('BeGin/wITH.tyPE&conTeNt'                                                 ,'Begin/With.Type&Content')
    ,('Code.cc#User.lenGTh-USer-AND&tyPE TypE&leNgtH.tYPe usER.UseR&with'       ,'Code.Cc#User.Length-User-And&Type Type&Length.Type User.User&With')
    ,('RaNgE&COnTeNT WITh CoNTENT-TypE tyPe'                                    ,'Range&Content With Content-Type Type')
    ,('BEgin COdE#uSeR#aGeNt.USeR'                                              ,'Begin Code#User#Agent.User')
    ,('TypE LENGth'                                                             ,'Type Length')
) | % {
    $s,$e = $_
    $r = &$f $s
    "$($r-ceq$e): $r"
}

出力：

True: Foo:bar
True: Agent Accept/Length-Type User Range.Type
True: Type&Agent/Cc/Content Length#Accept/Agent.Range-Cc/Content/Code
True: Cc/Responce.Length#Type-With&User/Begin&User.Agent&Begin/Accept/Cc
True: Length#User.Type/Begin&Length Type/Accept#Range/Code&And-Accept/Content
True: Content/Accept
True: Begin/With.Type&Content
True: Code.Cc#User.Length-User-And&Type Type&Length.Type User.User&With
True: Range&Content With Content-Type Type
True: Begin Code#User#Agent.User
True: Type Length

QBasic、74バイト

1c$=LCASE$(INPUT$(1))
IF f=0THEN c$=UCASE$(c$)
f=c$>"@
?c$;
IF""<c$GOTO 1

バイトはCP-437でカウントされます。シングルバイト（文字コード20）です。

ここでの入力方法は少し奇妙です。文字は一度に1つずつ入力され、表示される前に大文字が変換されます。入力aGeNTすると、画面にとして表示されますAgent。押すEnterとプログラムが終了します。

Python 3、122バイト

lambda s:''.join(chr(ord(c)+[[0,0],[0,32],[-32,0]][('@'<c<'[')-('`'<c<'{')]['@'<p<'['or'`'<p<'{'])for c,p in zip(s,'-'+s))

オンラインでお試しください！

素晴らしいスコアではありませんが、大文字と小文字を変更するための組み込みの文字列操作をせずに試してみたかったです。

PHP-23文字

mb_convert_case（$ w、2）;

動作するにはphp_mbstringが必要です