Comment detail
LL Golf Hole 2 - 文字列に含まれる単語の最初の文字を大文字にする (Nested Flatten)
匿名
#6939()
[
PostScript
]
PostScript でもう少し真面目に。上のも含めて標準出力に出力します。
1 2 3 4 5 6 7 8 9 | [(LL future)(LL day and night)(echo $home)(hello, i am a cat.)]/l{( )search exch dup(a)ge 1 index({)lt and{0 2 copy get -33 and put[}if pop{pop l}if}def{dup l =}forall
% 出力
LL Future
LL Day And Night
Echo $home
Hello, I Am A Cat.
% バイナリーエンコードする場合はこちらの方が短い
[(LL future)(LL day and night)(echo $home)(hello, i am a cat.)]{dup{( )search exch dup(a)ge 1 index({)lt and{0 2 copy get -33 and put[}if pop not{exit}if pop}loop =}forall
|
匿名
#6938()
[
PostScript
]
Rating0/0=0.00
PostScript 不真面目版。スペースが2個続くとエラーで止まります。
余談ですが、s/与力/余力/ ですね。
[(LL future)(LL day and night)]/l{( )search exch 0 2 copy get -33 and put{pop l}if}def{dup l =}forall % 出力 LL Future LL Day And Night % バイナリーエンコードする場合はこちらをエンコードしたものの方が短い [(LL future)(LL day and night)]{dup{( )search exch 0 2 copy get -33 and put not{exit}if pop}loop =}forallRating0/0=0.00-0+
2 replies [ reply ]