Problem:
Problem P04: CamelCase

プログラミングにおける識別子（変数や関数）の命名では、
単語を連結した複合語が使われる。
しかし、そのまま連結すると単語の区切りがわからなくなるため、
一般的に以下の命名規則の中から統一するものを選び適用する：

Upper CamelCase　にする

単語を直接連結し複合語とし、各単語の先頭文字のみを大文字にする。

例： GetUserName

Lower CamelCase　にする

単語を直接連結し複合語とし、各単語の先頭文字のみを大文字にする。ただし、複合語の先頭文字は小文字にする。

例： getUserName

アンダースコアで繋ぐ

単語をアンダースコアで連結し複合語とする。単語の文字はすべて小文字にする。

例： get_user_name

与えられた識別子を、指定された命名規則を適用して出力するプログラムを作成せよ。
与えられる識別子は、上記の命名規則のいづれかが既に適用されているものとする。

Input

入力として複数のデータセットが与えられる。各データセットは以下の形式で与えられる：

name type （識別子、命名規則：　空白区切りの文字列と文字）

typeは命名規則を示す文字であり、以下の表の通りとする：

type

命名規則

U

Upper CamelCase にする

L

Lower CamelCase にする

D

アンダースコアで繋ぐ

与えられる識別子の文字数は 1 以上 100 以下である。

type が 'X' のとき入力の終わりとする。この入力に対する出力を行ってはならない。

Output

各データセットについて、命名規則を適用した識別子を1行に出力せよ。

Sample Input

get_user_name L
getUserName U
GetUserName D
EndOfInput X

Output for the Sample Input

getUserName
GetUserName
get_user_name

Solution in Ruby (judge verdict: Accepted)

while l = gets
  name, type = l.split
  break if type == "X"
  ret = ""
  if name.include?("_")
    if type == "D"
      ret = name
    else
      names = name.split("_")
      sz = names.size
      if type == "L"
        ret = names[0]
      else
        ret = names[0].capitalize
      end
      (1..sz-1).each do |i|
        ret << names[i].capitalize
      end
    end
  else
    sz = name.size
    if type == "U"
      x = name[0].capitalize
      ret << x << name[1,sz-1]
    else
      x = name[0].downcase
      ret = x
      if type == "L"
        ret << name[1,sz-1]
      else
        (1..sz-1).each do |i|
          if name[i].match(/[A-Z]/) == nil
            ret << name[i]
          else 
            ret << "_" << name[i].downcase
          end
        end
      end
    end
  end
  puts ret
end