 | Given an HTML string, find all references to resources (links, scripts,
--   etc.)
findReferences :: T.Text -> (T.Text, [T.Text])
findReferences document =
    ( findBase tags
    , catMaybes (tagToReference <$> tags)
    )
    where tags = parseTags document

findReferences :: T.Text -> (T.Text, [T.Text])
findReferences document =
    ( findBase tags
    , catMaybes (tagToReference <$> tags)
    )
    where tags = parseTags document
findReferences document =
    ( findBase tags
    , catMaybes (tagToReference <$> tags)
    )
    where tags = parseTags document