비교적 빠른 편이지만 마음에 드실 것입니다.

Codegolf는 문장 형태로 입력을 한 다음 각 단어에서 대문자로 된 첫 글자를 출력하는 프로그램입니다.

규칙 :

1. 제출물은 기능의 형태가 아닐 수 있습니다. 그래서 안돼:

   function x(y){z=some_kind_of_magic(y);return z;} 최종 답변으로 ... 코드는 입력이 필요하고 출력을 제공한다는 것을 보여 주어야합니다.

2. 코드는 입력 된 다른 대문자를 유지해야합니다. 그래서

   eCommerce and eBusiness are cool, don't you agree, Richard III?
   

   로 렌더링됩니다

   ECommerce And EBusiness Are Cool, Don't You Agree, Richard III?
   

3. 여러분 중 일부는 "쉽게, 그냥 정규식을 사용하겠습니다!"라고 생각할 수도 있습니다. 선택한 골프 언어로 기본 정규식을 사용하면 최종 코드 수에 적용되는 30 자 패널티가 부과됩니다. 사악한 웃음

4. 이 경우 "단어"는 공백으로 구분 된 것입니다. 따라서 palate cleanser두 단어이지만 pigeon-toed한 단어로 간주됩니다. if_you_love_her_then_you_should_put_a_ring_on_it한 단어로 간주됩니다. 단어가 알파벳이 아닌 문자로 시작하면 단어는 그대로 유지되므로 _this렌더링 후에는로 유지됩니다 _this. (이 테스트 사례를 지적한 Martin Buttner에게 Kudos).

   • 4b. 입력 문구의 단어가 단일 공백으로 분리된다는 보장은 없습니다.

5. 테스트 사례 (코드 테스트에 사용하십시오) :

   입력:

   eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye
   

   산출:

   ECommerce Rocks. CrazyCamelCase Stuff. _those  Pigeon-toed Shennanigans. Fiery Trailblazing 345 Thirty-two Roger. The Quick Brown Fox Jumped Over The Lazy Dogs. Clancy Brown Would Have Been Cool As Lex Luthor. Good_bye
   

6. 이것은 코드 골프, 가장 짧은 코드 승리입니다 ...

행운을 빕니다...

CJam, 15 13 바이트

Lq{_eu?_S-}/;

CJam 통역사 에서 온라인으로 사용해보십시오 .

의사 코드

L             e# B := ""
 q            e# Q := input()
  {       }/  e# for C in Q:
   _eu?       e#     C := B ? C : uppercase(C)
       _S-    e#     B := string(C).strip(" ")
            ; e# discard(B)

수정 된 모든 문자 C는 스택에 남아 있으므로 종료시 인쇄됩니다.

CSS 2.1, 49

:after{content:attr(t);text-transform:capitalize}

설명 :

• 이 attr함수는 t(텍스트) HTML 속성 에서 입력을받습니다 .
• 로 설정 text-transform하면 입력이 대문자로 표시 됩니다 capitalize.
• 출력은 의사 요소 의 content특성을 사용하여 생성 된 컨텐츠로 제공됩니다 .::after

실행 가능한 스 니펫 :

:after {
    content: attr(t);
    text-transform: capitalize;
}

<div t="eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye"></div>

참고 : CSS 2.1 은 원하는 동작을 지정했습니다 capitalize. 각 단어의 첫 문자는 대문자입니다. 그러나 CSS3 는 각 단어의 첫 글자 체계 를 나타냅니다. 따라서 위의 스 니펫은 CSS 2.1을 따르지 않은 이전 IE에서도 제대로 작동하지 않습니다. CSS3를 따르는 새로운 호환 브라우저에서도 마찬가지입니다.

자바 스크립트 ( ES6 ), 77 바이트

alert(prompt().split(' ').map(x=>x&&x[0].toUpperCase()+x.slice(1)).join(' '))

댓글

alert( // output
    prompt(). // take input
    split(' '). // split by spaces
    map(x=> // map function to array
        x && // if x, empty string "" is falsey and returns itself
        x[0].toUpperCase() + x.slice(1) // capaitalize 1st char and concatenate the rest
    ).
    join(' ') // join array with spaces
)

펄, 13 바이트

perl -040pe '$_="\u$_"'

9 바이트 + 4 바이트 040p( 특별 호출 규칙을 올바르게 해석했다고 가정 ).

-040입력 레코드 구분 기호 $/를 단일 공백으로 설정하므로 공백이 유지됩니다. \u이스케이프 시퀀스는 제목의 경우에 다음 문자로 변환합니다.

CJam, 17 15 바이트

lS/{S+(eu\+}/W<

여기에서 테스트하십시오.

사양을 매우 간단하게 구현합니다. {}&연속 공백에 대한 오류를 피하기 위해 새로운 기능 을 사용 하십시오.

Dennis가 2 바이트를 절약했습니다.

C, 64 63 바이트

a;main(c){while(~(c=getchar()))putchar(a?c:toupper(c)),a=c-32;}

수정 : Clang과 같은 일부 컴파일러는 argv 대신 int 매개 변수를 좋아하지 않으므로 전역 변수로 옮겼습니다. 바이트 수는 동일하게 유지됩니다. 눈치 채기 위해 으스스한 ossifrage 덕분입니다. Dennis 덕분에 63 바이트까지 감소했습니다.

언 골프 드 :

int a;

int main(int c) {
    while(~(c = getchar()))
        putchar(a ? c : toupper(c)),
        a = c - ' ';
}

매우 간단합니다. a가 false이면 문자가 대문자로 변환됩니다. 공백을 읽은 후에 설정됩니다. c- ''는 c == ''인 경우에만 false입니다. toupper ()는 소문자가 아닌 모든 것을 무시하므로 기호와 여러 공백이 좋습니다. -1에는 모든 비트가 설정되어 있으므로 getchar ()가 -1을 반환하면 NOT 연산자가 0으로 만들고 루프가 중지됩니다. a는 전역 변수로 선언되므로 0으로 초기화됩니다 (false). 이렇게하면 첫 단어가 대문자로 표시됩니다.

파이썬 3, 59 56 바이트

f=1
for c in input():print(end=f*c.upper()or c);f=c==" "

3 바이트에 대한 @Reticality 덕분에.

펄 버전 <5.18, 30 27 26 25

say map"\u$_",split$,=$"

24문자 +1에 대한 -n.

\u문자열의 다음 문자를 대문자로 만듭니다. 1 바이트를 절약하기 위해 이것을 지적하지 않았습니다. 함수를 사용하기 전에 ucfirst.

로부터 의 perldocs ,

또 다른 특수한 경우로, split은 PATTERN이 생략되거나 단일 공백 ​​문자 (예 : ''또는 "\ x20"과 같은 리터럴 문자열 (예 : //)) 인 경우 awk 명령 줄 도구의 기본 동작을 에뮬레이트합니다. 이 경우 EXPR의 선행 공백은 분할이 발생하기 전에 제거되고 PATTERN은 / \ s + / 인 것처럼 처리됩니다. 특히, 이것은 단일 공백 ​​문자가 아닌 연속 공백이 분리 자로 사용됨을 의미합니다. 그러나 문자열 ""대신 패턴 //을 지정하면 이러한 특수한 처리를 피할 수 있으므로 단일 공백 ​​문자 만 구분 기호로 사용할 수 있습니다. 이전의 Perls에서는이 특별한 경우가 Perl 5.18에서 분리 할 패턴 인수로 일반 ""사용으로 제한되었습니다.

$"공백으로 평가 되므로 공백이 보존됩니다. 우리는 모두 세트에 원하기 때문에 $,공백 문자, 입력 분할에 공백 문자, @nutki 우리가 분할의 입력으로 모두 할 수있는 지적했다. 그것은 우리가 전에 가지고 있던 것에서 3 바이트를 절약합니다. 이것은 처음 설정 $,한 다음 $"스플릿에 입력 되었습니다.

사용 a ,대신 맵은 {}알렉산더 - 브렛 지적 @으로서, 추가 바이트를 저장합니다.

로 실행 :

echo 'eCommerce     rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye' | perl -nE'say map"\u$_",split$,=$"'

> <> (물고기) , 39 바이트

</?-' 'o:;?(0:<-*' '*('{'$)'`'::i
i/.0e

방법:

• 한 문자를 가져 와서 범위 내에 있으면 대문자 a-z로 인쇄하십시오. (이 부분의 왼쪽에서 오른쪽 코드는입니다 i::'backquote')$'{'(*' '*+)
• 경우 마지막 촬영 문자가있는 EOF의 문자는 다음 종료 다른 인쇄 할
• 경우 마지막 촬영 문자가 공백 문자는 다음 포인트 1로 이동 다른 새로운 편지를 가지고 점 2로 이동합니다.

자바, 273 바이트

편집하다

import static java.lang.System.*;class x{public static void main(String[] s){char[] a=new java.util.Scanner(in).nextLine().toCharArray();boolean f=1>0;for(int i=0;i<a.length;i++){if(a[i]==' '){f=1>0;continue;}if(f){a[i]=Character.toUpperCase(a[i]);f=1<0;}}out.println(a);}}

자바 스크립트 (정규 솔루션)-104 바이트

누군가 총알을 물고 RegEx 솔루션을 게시해야합니다! 74 자 + 페널티 +30

alert(prompt().replace(/(^| )[a-z]/g,function(m){return m.toUpperCase()}))

또는 압축되지 않은 방식으로 코드를 읽고 이해하려는 경우 :

//     Matches the (beginning of the line or a space), followed by a lowercase English character.  
string.replace( /(^| )[a-z]/g ,
                function(match) { return match.toUpperCase(); }

파이썬 2, 73 바이트

i=raw_input()
print''.join((c,c.upper())[p==' ']for p,c in zip(' '+i,i))

이 프로그램은 공백이 앞에 오는 경우 문자를 대문자로 표시합니다 (문자열의 첫 문자에 kludge가 있음). 그것은에 의존 .upper()제대로 활용하기 위해 문자열 방법.

PHP 64 76 77 83 84 89 바이트

$_GETPHP에서 입력으로 계산 됩니까 ?
그렇다면 여기에 첫 번째 CG 시도가 있습니다

foreach(explode(' ',$_GET[@s])as$k=>$v)echo$k?' ':'',ucfirst($v)

감사합니다 manatwork :)

ucwords함수를 사용하면 21 바이트가됩니다.

<?=ucwords($_GET[@s])

감사합니다 Harry Mustoe-Playfair :)

하스켈, 69

import Data.Char
main=interact$tail.scanl(!)' '
' '!c=toUpper c;_!c=c

설명:

scanl함수 (a -> b -> a)와 초기 값을 취한 a다음 [b]s 목록을 반복하여 s 목록 을 만듭니다 [a].

scanl (!) z [a,b,c] == [   z
                       ,   z ! a
                       ,  (z ! a) ! b
                       , ((z ! a) ! b) ! c]

이것은 반복 얻어 이전 결과 는 AS 왼쪽 인자 에 전달 함수, 및 상기 입력리스트에서의 값 은 AS 오른쪽 인자 는 다음 중 하나를 만들기 위해.

(!) :: Char -> Char -> Char전달하는 올바른 문자를 반환 하는 함수 를 작성 했지만 왼쪽 문자가 ' '(공백) 이면 대문자를 사용합니다 . 의 경우 이는 입력 목록에서 값을scanl 리턴 하지만 이전 결과 가 공백 인 경우 대문자를 의미합니다 . 따라서 다음과 같이 됩니다.scanl (!) ' ' "ab cd"

    scanl (!) ' ' "ab cd"
==> ' ' : scanl (!) (' ' ! 'a') "b cd"
==> ' ' : scanl (!)     'A'     "b cd"
==> ' ' : 'A' : scanl (!) ('A' ! 'b') " cd"
==> ' ' : 'A' : scanl (!)     'b'     " cd"
==> ' ' : 'A' : 'b' : scanl (!) ('b' ! ' ') "cd"
==> ' ' : 'A' : 'b' : scanl (!)     ' '     "cd"
==> ' ' : 'A' : 'b' : ' ' : scanl (!) (' ' ! 'c') "d"
==> ' ' : 'A' : 'b' : ' ' : scanl (!)     'C'     "d"
==> ' ' : 'A' : 'b' : ' ' : 'C' : scanl (!) ('C' ! 'd') ""
==> ' ' : 'A' : 'b' : ' ' : 'C' : scanl (!)     'd'     ""
==> ' ' : 'A' : 'b' : ' ' : 'C' : 'd' : ""
==> " Ab Cd"

' '첫 글자를 대문자로 하려면 초기 값 이 필요 하지만 tail최종 결과를 얻으려면 잘라 내야 합니다.

Pyth, 20 바이트

uXGHr@GH1fqd@+dzTUzz

이 여러 공간은 정말 짜증납니다. 그렇지 않으면 정말 쉬운 12 바이트 솔루션이 있었을 것입니다.

온라인 사용해보기 : Pyth Compiler / Executor

설명

                      implicit: z = input string
         f       Uz   filter [0, 1, 2, ..., len(z)-1] for elements T, which satisfy:
          qd@+dzT        " " == (" " + z)[T]
                      (this finds all indices, which should be capitalized)
u                  z  reduce, start with G = z, for H in idices ^ update G by
 XGH                     replace the Hth char of G by
    r   1                upper-case of
     @GH                 G[H]
                      implicitly print result

편집 : @Dennis 알고리즘으로 16자를 사용할 수 있습니다.

CJam, 14 바이트

가장 짧지는 않지만 ...

qS/Sf.{\eu}s1>

비슷한 아이디어를 사용하는 또 다른 대답 :

qS/Laf.{;eu}S*

.x 매개 변수 중 하나에 하나의 항목 만있는 경우 첫 번째 항목 만 변경합니다.

루아, 64 62 61 바이트

루아 (Lua)는 골프를하기에 끔찍한 언어이기 때문에 나는 이것에 대해 자부심을 느낍니다.

print(string.gsub(" "..io.read(),"%s%l",string.upper):sub(2))

[여기 시도] 1 기한이 지남에 따라 업데이트됩니다.

자바, 204 211 226 바이트

CG에 대한 첫 번째 항목은 괜찮을 것입니다.

class U{public static void main(String[]s){int i=0;char[]r=s[0].toCharArray();r[0]=Character.toUpperCase(r[0]);for(char c:r){if(c==' '&&i>0)r[i+1]=Character.toUpperCase(r[i+1]);i++;System.out.print(c);}}}

@TNT 덕분에 7 바이트 절약

PHP : 76 74 자

foreach($l=str_split(fgets(STDIN))as$c){echo$l?ucfirst($c):$c;$l=$c==" ";}

샘플 실행 :

bash-4.3$ php -r 'foreach($l=str_split(fgets(STDIN))as$c){echo$l?ucfirst($c):$c;$l=$c==" ";}' <<< 'eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye'
ECommerce Rocks. CrazyCamelCase Stuff. _those  Pigeon-toed Shennanigans. Fiery Trailblazing 345 Thirty-two Roger. The Quick Brown Fox Jumped Over The Lazy Dogs. Clancy Brown Would Have Been Cool As Lex Luthor. Good_bye

C, 74 바이트

a,b=1;main(){while((a=getchar())>0)b=isspace(putchar(b?toupper(a):a));}

런타임 문자 세트 (ASCII, EBCDIC, Baudot 등)에 대해 가정하지 않습니다. EOF가 부정적이라고 가정합니다 (C가 그것을 보증한다고 생각합니다).

a,b=1;
main()
{
    while((a=getchar())>0)
        b=isspace(putchar(b?toupper(a):a));
}

a는 입력 문자입니다. 마지막 문자가 공백이면 b는 true입니다. 명백한 유일한 비트는 putchar오류가 없으면 인쇄 된 문자 를 반환 한다는 사실을 사용한다는 것입니다 .

C # Linq-187

이것은 승리에 가깝지 않지만 Linq를 너무 좋아합니다.

namespace System{using Linq;class P{static void Main(string[]a){Console.Write(a[0].Substring(1).Aggregate(a[0][0].ToString().ToUpper(),(b,c)=>b[b.Length-1]==32?b+char.ToUpper(c):b+c));}}}

Vim, 11 , 10 바이트

qqvUW@qq@q

설명:

qq           #Start recording in register 'q'
  vU        #Make the character under the cursor uppercase
     W       #Move forward a WORD
      @q     #recursively call macro 'q'
        q    #stop recording
         @q  #Call the recursive macro

데니스 아웃 고핑을 위한 금장을 받을 수 있습니까?

배쉬, 61

a="${@//: / }"
a=(${a//: / })
a="${a[@]^}"
echo "${a//:/ }"

콜론은 단순히 프로그램이 여기에 표시되도록하는 것입니다. 실제로 이들은 BEL과 같이 인쇄 할 수없는 문자 일 수 있습니다.

산출

$ ./cap1st.sh "eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye"
ECommerce Rocks. CrazyCamelCase Stuff. _those  Pigeon-toed Shennanigans. Fiery Trailblazing 345 Thirty-two Roger. The Quick Brown Fox Jumped Over The Lazy Dogs. Clancy Brown Would Have Been Cool As Lex Luthor. Good_bye
$ 

배쉬, 12

슬프게도이 공간은 선행 / 다중 / 후행 공간을 유지하지 않지만 그렇지 않으면 작동합니다.

echo "${@^}"

산출

$ ./cap1st.sh eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye
ECommerce Rocks. CrazyCamelCase Stuff. _those Pigeon-toed Shennanigans. Fiery Trailblazing 345 Thirty-two Roger. The Quick Brown Fox Jumped Over The Lazy Dogs. Clancy Brown Would Have Been Cool As Lex Luthor. Good_bye
$ 

핍 , 15 + 1 -s= 16

{IaUC:a@0a}Ma^s

설명:

                  a is first cmdline arg (implicit)
            a^s   Split a on spaces
{         }M      Map this function to each element:
 Ia                 If the word is not empty,
   UC:a@0             uppercase its first character
         a          Return the word
                  Output the resulting list (implicit) joined on spaces (-s flag)

이 프로그램이 사용하는 Pip의 흥미로운 기능 중 하나는 :할당 메타 연산자입니다. 대부분의 C와 같은 언어에는 계산 및 할당 연산자 세트가 있습니다. 예를 x*=5들어와 같은 기능을 수행 x=x*5합니다. 핍 그러나, 당신은 압정 수 :에 어떤 연산자와 컴퓨팅 및-할당 연산자 변환합니다. 단항 연산자에도 적용됩니다. 따라서 -:x계산 -x과 x동일 하게 다시 할당합니다 x:-x. 이 경우, UC:단어의 첫 문자를 대문자로하기 위해 (Pip의 변경 가능한 문자열과 함께)가 사용됩니다.

프로그램은 명령 행에서 입력을 가져 오며 다음과 같은 호출이 필요합니다.

python3 pip.py -se "{IaUC:a@0a}Ma^s" "test teSt TEST  _test"

C, 125

가장 짧은 해결책은 아니지만 C에서 골프를 좋아합니다.

char b[99];main(c){while(scanf("%[A-Za-z_-]",b)==1)islower(*b)&&(*b&=223),printf("%s",b);~(c=getchar())&&putchar(c)&&main();}

언 골프 :

char b[99];
main(c)
{
  while(scanf("%[A-Za-z_-]", b) == 1) {
    if(islower(b[0])) {
      b[0] &= 0xDF;
    }
    printf("%s", b);
  }
  if((c = getchar()) != -1) {
      putchar(c);
      main();
  }
}

정규식과 같은 구문을 사용 scanf하는 규칙을 잘 알고 있지만 잘 작동합니다. (기술적으로 완전한 정규 표현식 이 아닙니다 )

고려해야 할 또 다른 사항은이 코드가 99 바이트보다 짧은 단어에 대해서만 작동한다는 것입니다. 그러나이 솔루션은 대부분의 경우 효과적이라고 생각합니다.

하스켈 : 127 자

import Data.List
import Data.Char
i=isSpace
s a b=i a==i b
u (w:ws)=(toUpper w):ws
f w=concatMap u$groupBy s w
main=interact f

PHP, 82

echo join(' ',array_map(function($s){return ucfirst($s);},explode(' ',$argv[1])));

사용법 :

$ php code.php "eCommerce rocks. crazyCamelCase stuff. _those  pigeon-toed shennanigans. Fiery trailblazing 345 thirty-two Roger. The quick brown fox jumped over the lazy dogs. Clancy Brown would have been cool as Lex Luthor. good_bye"

C의 # 133 131

using C=System.Console;class P{static void Main(){var s=2>1;foreach(var c in C.ReadLine()){C.Write(s?char.ToUpper(c):c);s=c==32;}}}

매스 매 티카, 66 바이트

Print@StringReplace[InputString[],WordBoundary~~a_:>ToUpperCase@a]

사용 ToCamelCase하지만 간격을 유지하지는 않습니다.

R, 139105 바이트

for(i in 1:length(p<-strsplit(readline(),"")[[1]])){if(i<2||p[i-1]==" ")p[i]=toupper(p[i])};cat(p,sep="")

언 골프 + 설명 :

# Assign p to be a vector of the input read from stdin, split into characters

for(i in 1:length(p <- strsplit(readline(), "")[[1]])) {

    # If we're at the first iteration or the previous character was a space

    if (i < 2 || p[i-1] == " ") {

        # Convert the current character to its uppercase equivalent

        p[i] <- toupper(p[i])
    }
}

# Join the vector elements into a single string and print it to stdout
cat(p, sep = "")

정규식이있는 R, 49 41 + 30 = 71 바이트

나는 정말로 화를 내고있다. 이것은 실제로 페널티와 함께 ​​정규 표현식을 사용하여 더 나은 점수를 얻습니다.

gsub("(^.| +.)","\\U\\1",readline(),pe=T)

이것은 문자열의 시작 부분이나 여러 공백 뒤에있는 단일 문자와 일치하며 대문자의 캡처 버전으로 바꿉니다. 신청 \\U은 합법적이며 비 레터에 영향을 미치지 않습니다. pe=T는 perl = TRUE함수 매개 변수의 R 부분 일치와의 동의어를 활용하기 때문에 해석됩니다 TRUE. 어떤 이유로 든 R은 기본적으로 Perl 스타일의 정규 표현식을 사용하지 않습니다.

정규식 접근 방식으로 8 바이트를 절약하는 데 도움을 준 MickyT에게 감사드립니다!