Skip to content

Instantly share code, notes, and snippets.

View Zoybean's full-sized avatar

Zoey Hewll Zoybean

View GitHub Profile
Zoybean / Pronounify.hs
Last active February 5, 2017 04:59 — forked from Qata/Pronounify.hs
View Pronounify.hs
import Data.String.Utils (replace)
import Data.Char (isUpper, toUpper)
import System.Environment (getArgs)
main :: IO ()
main = do
strings <- getArgs
mapM_ (putStrLn . pronounify) strings
capitalise :: String -> String