Skip to content

Instantly share code, notes, and snippets.

@MiyamonY

MiyamonY/caplocker.hs

Created February 27, 2015 09:41
Show Gist options
  • Save MiyamonY/b5a2c3f669e3286f5d8f to your computer and use it in GitHub Desktop.
Save MiyamonY/b5a2c3f669e3286f5d8f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
caplocker.hs
import Control.Monad
import Data.Char
main :: IO ()
main = forever $ do
l <- getContents
putStrLn $ map toUpper l
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment