#!/usr/bin/env runhaskell
main :: IO ()
main = do
  let a = splitOn ' ' "hoge fuga"

splitOn :: Char -> String -> [String]
splitOn splitter string = []