import Text.HTML.TagSoup

main :: IO ()
main = print $ parseTags tags

okay