challenge LL Golf Hole 2 - 文字列に含まれる単語の最初の文字を大文字にする

文字列に含まれる単語について、それぞれの単語の最初の文字を大文字にしてください。

たとえば、"LL future" と与えられたときは "LL Future" と出力する。"LL day and night" と与えられたときは "LL Day And Night" と出力する。

与えられる文字列はリテラルで表記する、標準入力で与えられる、引数で与えられるなどは自由とします。

余力のあるものはこのプログラムを短くしてみたり、短くしてみたり、短くしてください。

※LL Future実行委員の高野光弘です。この出題は LL Future公式の出題であり、優れたものについてはLL Golfのセッションでご紹介させていただくかもしれません。ご理解の上、ご投稿ください。また、LL Futureのチケットは現在も発売中です。よろしければ、メインイベントの方にもぜひご参加ください。

1
ruby -e "p 'LL day and night'.scan(/(\w)(\w*)/).map{|a|a.shift.upcase + a.to_s}.join(' ')"

Posted feedbacks - Smalltalk

Squeak Smalltalk で。

1
2
3
4
5
6
| in prev |
in := 'LL day and night'.
prev := $-.
^in collect: [:char | prev := prev isLetter ifTrue: [char] ifFalse: [char asUppercase]]

"=> 'LL Day And Night' "

GST で stdin → stdout。
1
P:=$ .stdin do:[:c|C:=c.'',{P}~'\w'or:[C:=c asUppercase].P:=C display]

Squeak Smalltalk で、組み込みのエディタ(a ParagraphEditor)に委譲してみる~の巻。

ゴルフに参加する(短くする)気ゼロで済みません汗。

1
2
3
4
5
| in editor |
in := 'this is a pen'.
editor := ParagraphEditor newParagraph: in asParagraph.
editor selectAll; makeCapitalized: nil.
^editor text asString   "=> 'This Is A Pen' "

Index

Feed

Other

Link

Pathtraq

loading...