termcolor/Main.hs
2017-03-30 15:40:17 +04:30

8 lines
254 B
Haskell

import Text.Termcolor
import Text.Termcolor.Style
import qualified Text.Termcolor.Foreground as F
import qualified Text.Termcolor.Background as B
main = do
putStrLn $ format $ underline . bold . (light . B.cyan) . (light . F.red) $ read "Hello guys!"