kurimuraの適当Haskell勉強日記

■ ハイフンで区切られた文字をキャピタライズ 11:32

とりあえず自分でも出来そうな問題を解いてみる。

ええと、...(思案中)...

-AAAAA -> -Aaaaa

AAA-AAA -> Aaa-Aaa

ええと文字列の先頭とハイフンの直後の文字が大文字になってあとは小文字か。

よし、こうかな？

import Char
capitalize str = zipWith f ('-':str) str where
  f '-' = toUpper
  f  _  = toLower
main = do
  print $ capitalize "in-reply-to"
  print $ capitalize "X-MAILER"

よしよし、なんだかうまく動いているっぽい。

haskellはパズルっぽくて面白いなー