チャレンジ：

特定の位置で分割された文字列を指定し、指定された単語の最初の文字を大文字にします。最初の単語の最初の文字が大文字になっている場合にのみ大文字にする

入力：

文字列sと文字c。

出力：

出現するたびにc最初の文字を大文字にした文字列

例：

STRING(s)             CHARACTER(c)  RESULT
Hello_world           _             HelloWorld
me,no,like            ,             meNoLike
you-got-it            -             youGotIt
Am^I^clear            ^             AmIClear
go!full!caps          !             goFullCaps
weird&but&tRue        &             weirdButTRue
ProbleM1fixed1no      1             ProbleMFixedNo
!prob!!lem!s!Olved!!  !             ProbLemSOlved

注意 ：

• 指定された入力は常に有効です。つまり、最初の文字列は常に、置換する文字の少なくとも1つのインスタンスを持つ文字列になります。2番目は常に単一の文字になります。
• 入力文字列の長さは4より大きくなります。

• 分割する文字が少なくとも1回出現します。

• 入力には、文字と区切り文字のみが含まれることが保証されます（@Arnauldに感謝）

• 区切り文字はアルファベットではないもの（az / AZ）（@Dennisが推奨）

受賞基準：

これはコードゴルフなので、各言語のバイト単位の最短コードが優先されます。

1. 2つの間違いを指摘してくれた@JonathanAllanに感謝します。

Python 3、63バイト

lambda s,c:''.join(map(min,s,s[0]+s.title()[1:])).replace(c,'')

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

C（gcc）、61 53 55バイト

デニスのおかげで-8バイト！

f(s,c)char*s;{for(;*s;putchar(*s++))if(*s==c)*++s&=95;}

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

JavaScript（ES6）、58 56バイト

@ l4m2 / @Downgoatのおかげで2バイト節約

カリー化構文の入力を受け取ります(s)(c)。

s=>c=>s.replace(u=/./g,x=>u=x==c?'':u?x:x.toUpperCase())

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

コメント済み

s => c =>                  // given s and c
  s.replace(u = /./g, x => // initialize u to a RegExp; replace each character x in s with,
    u =                    // and update u to:
      x == c ?             //   if x is the separator:
        ''                 //     an empty string
      :                    //   else:
        u ?                //     if u is not an empty string:
          x                //       x unchanged
        :                  //     else:
          x.toUpperCase()  //       x capitalized
  )                        // end of replace()

Perl 6、19 -pバイト

s:g[<:!L>(.)]=$0.uc

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

sed 4.2.2（-r）、21

s/[^a-z]+(.)?/\u\1/gi

\W代わりに試しましたが[^a-z]、残念ながらそれは一致しません_。

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

ゼリー、8バイト

Œt⁸1¦«⁸ḟ

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

使い方

Œt⁸1¦«⁸ḟ  Main link. Left argument: s (string). Right argument: c (character).

Œt        Title case; capitalize the first character of each word.
  ⁸1¦     Replace the first character of the result with the first character of s.
     «⁸   Take the character-wise minimum of the result and s.
          Note that uppercase letters have lower code points than lowercase ones.
       ḟ  Filterfalse; remove all occurrences of c.

オクターブ、83、66、64のバイト

Luis Mendoのおかげで2バイト節約されました。upperの代わりにtoupper。

@(s,c,k=upper(s(i=find(s==c)+1)))[strsplit({s(i)=k,s}{2},c){:}];

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

うわー、これはおそらく私が今まで書いた中で最も厄介なオクターブコードです！これは、このヒントの質問に投稿された2つのトリック、つまり引数リストとセル配列を使用します。

説明：

引数リストの入力：

@(s,c,k        % An anonymous function that may take three input variables, s, c, k
               % where the third argument has the default value:
 k=upper(s(i=find(s==c)+1))

kここでは、s各セパレータの後の最初の文字がc大文字に変換されます。各大文字の文字のインデックスはに保存されiます。

セル配列本体：

2つの要素を持つセル配列を作成します。1つはすべてのi番目の文字をの対応する要素で置き換える必要があると言いk、もう1つsは既に更新されています。これを使用してインデックスを作成し{2}、変更された文字列全体のみを取得します。これはに送らstrsplitれ、セパレータ文字でセルに分割されます。を使用してコンマ区切りのリストに変換し、{:}角括弧を使用して連結して文字列に戻します[]。

それはあなたに意味をなさない場合は謝罪...それは私にはほとんど意味がありません：P

Retina 0.8.2、20バイト

T`lLp`LL_`[\W\d_]+.?

オンラインでお試しください！文字列のみを使用し、セパレータはオプションです。アルファベット以外の文字はすべて削除されますが、その後のアルファベット文字はすべて大文字になります。以前の34バイトバージョンは、任意の入力を受け入れました。

T`l`L`(?=.*(.)$)\1+.
(?=.*(.)$)\1

オンラインでお試しください！リンクにはテストスイートが含まれています。入力が連結された文字列と文字で構成されていると仮定します。説明：最初のステージでは、終了文字の出現直後のすべての文字が小文字から大文字に変換され、2番目のステージでは、終了文字の出現がすべて削除されます。

両方のソリューションで、右から左への一致を使用すること+も機能します。

APL（Dyalog Classic）、22バイト

{⍵~⍨1(819⌶@(⍵=¯1⌽⊢))⍺}

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

ローダ、57 54バイト

Cows quackのおかげで-3バイト

{(_/`\Q$_`)|{pull;[upperCase(_[:1]),_1[1:]]if[#_1>0]}}

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

説明：

{
  (_/`\Q$_`)| /* Pull two strings and split the first with the second */
  {
    pull;                /* Pull one string and print it */
                         /* For each string _1 in the stream: */
                         /*   If _1 is not empty: */
    [                    /*     Print: */
      upperCase(_[:1]),  /*       The first character capitalized */
      _1[1:]             /*       The rest of characters */
    ]if[#_1>0]           /*   End if */
  }
}

V、6 7バイト

引数を使用しないことで1バイト節約

ÓÁˆ/õ±

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

プログラムはテキストを入力として、charを引数として受け取ります。

Hexdump：

00000000: d3c1 882f f5b1                           .../..

これは単純な置換です。非圧縮、次のようになります

:s/\A(.)/\u\1/g

グローバル置換を実行します。この\A場合、アルファベット以外の文字とそれに続く文字(.)が、大文字の\u最初のキャプチャグループに置き換えられます。\1

Scala、83バイト

def f(s:String)={val w=s.split("[^a-zA-Z]");w(0)+w.tail.map(_.capitalize).mkString}

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

説明：

def f(s: String) = {                        // takes a String "s" as input
  val w = s.split("[^a-zA-Z]");             // split on non-alpha chars
  w(0) + w.tail.map(_.capitalize).mkString  // upper case first letter of all words except first one and join array into a String
}                                           //

赤、87バイト

func[s c][b: split s c prin b/1 foreach w next b[if w <>""[w/1: uppercase w/1 prin w]]]

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

05AB1E、9バイト

¡ćsvyćusJ

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

説明

¡           # split the string on the char
 ć          # extract the head of the resulting list
  s         # swap the head to the bottom of the stack
   vy       # for each string y in the rest of the list
     ću     # extract the head and capitalize it
       s    # swap it below the rest of the string
        J   # join everything to one string

PHP、91 83バイト

$a=explode($argv[2],$argv[1]);echo array_shift($a);foreach($a as$i)echo ucfirst($i);

で実行し-rます。explodeではなくsplitを使用すると2バイト短くなりましたが、^テストは正規表現が原因で失敗します。

-8 Medに感謝

Groovy、43バイト、45バイト

s.replaceAll(/\$c(.)/){it[1].toUpperCase()}

オンラインでお試しください。テストスイートには、セパレーターcharがないため、最後のアイテムを除外しましたc。

ゴー、138 92 87バイト

@Dennisのタイトルケースのアイデアのおかげで、46バイトが削除されました。

func f(s,d string){p:=Split(s,d);Print(p[0]+Replace(Title(Join(p[1:]," "))," ","",-1))}

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

殻、10バイト

ΣΓ·:mΓo:ax

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

説明

ΣΓ·:mΓ(:a)x  -- example inputs: 'x' "abxbcxcdxdex"
          x  -- split on character: ["ab","bc","cd","de"]
 Γ           -- pattern match (x = head) (xs = tail) and do..
  ·:         -- | construct list (x:xs) but with the second argument do..
    m        -- | | map (eg. "bc")
     Γ(  )   -- | | | pattern match on first character
      ( a)   -- | | | | upper-case it
      (: )   -- | | | | and join again
             -- | | | : "Bc"
             -- | | : ["Bc","Cd","De"]
             -- : ["ab","Bc","Cd","De"]
Σ            -- concatenate: "abBcCdDe"

F＃（モノ）、122バイト

let f(s:string)c=s|>Seq.mapi(fun i x->if i>0&&s.[i-1]=c then Char.ToUpper(x)else x)|>Seq.where((<>)c)|>Seq.toArray|>String

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

Java 10、141バイト

s->c->{var r=s.split("\\"+c);var r=a[0],t;for(int i=0;++i<a.length;r+=t.isEmpty()?"":(char)(t.charAt(0)&~32)+t.substring(1))t=a[i];return r;}

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

説明：

s->c->{                    // Method with String and character parameters and String return-type
  var r=s.split("\\"+c);   //  Split String by character (with potential regex char)
  var r=a[0],              //  Result-String, starting at the first item
      t;                   //  Temp-String to reduce bytes
  for(int i=0;++i<a.length;//  Loop in the range [1, length_of_array)
      r+=                  //    After every iteration: append the result-String with:
         t.isEmpty()?      //     If the current item empty:
          ""               //      Append nothing
         :                 //     Else:
          (char)(t.charAt(0)&~32)
                           //      Capitalize the first character
          +t.substring(1)) //     And append the other characters as is
    t=a[i];                //   Set `t` to the current String-item of the array
  return r;}               //  Return the result-String

R、87バイト

g<-function(s,x,z=strsplit(s,x,T)[[1]])cat(z[1],capwords(z[-1]),sep="")
example(chartr)

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

このトリックを使用すると、TIOで適切に実行できないため、シミュレートしました。

Tそれ以外の場合、テストケースの1つが失敗する必要があります。

スタックス、11 バイト

óKo{cplòüö\

実行してデバッグする

説明

/BsF1:/s^s|dl                 # Full Program, unpacked, Implicit Input
/                             # Split on substrings (Split input with symbol to split on)
 B                            # Remove first element from array. Push the tail of the array, then the removed element.
  s                           # Swap first two elements of stack
   F                          # Start for loop
    1:/                       # Split array at index; push both parts.
       s^s                    # Swap first two elements of stack, capitalize character, swap first two elements 
         |dl                  # Get length of stack, listify that amount (entire stack), implicit output of array

どうにかして修正したい部分がいくつかあります。約8バイトまで減らすことができますが、最後のテストケースで失敗します。<

ルビー -pl、36バイト

$_.gsub!(/[^a-z]+(.|$)/i){$1.upcase}

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

2番目の引数なしで文字列のみを受け取ります。gsub!メソッドのブロックバージョンを使用しgsub! x,yます。これ$1は、一般的な構文では一致データがすぐに入力されないためです。|$正規表現は、最後にセパレータがあるテストケースに必要です。

Python 3、77バイト

o=[]
for x in s.split(c): o.append(chr(ord(x[0])-32)+x[1:])
print(''.join(o))

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

これは、文字列がASCIIエンコードされ、入力が含まれる変数がプリロードされていることsを前提としてcいます。

for x in s.split(x)       #loop through items in the string s split by x
    o.append(             #add the following to c
        chr(              #turn the following number into a character
            ord(          #turn the following character into a number
                x[0]      #the first character in string x
            )-32          #subtract 32 from this number
        +x[1:]            #add everything past and including the second character in string x

このソリューションは、ASCIIエンコードでは、大文字が大文字の後に32エントリ配置されるという事実に基づいて動作します

編集：私はちょうどこれが文字列の最初の文字を大文字にすることを認識しましたが、そうすべきではありません。しかし、私は私のナンセンスを非常に誇りに思っているので、それが許可されている場合はこれを残します