-- report the leftovers.
report delgts normalize_function (d, Right raw_hosts) = do
let nrml_hosts = map normalize_function raw_hosts
-- report the leftovers.
report delgts normalize_function (d, Right raw_hosts) = do
let nrml_hosts = map normalize_function raw_hosts
-- Create one big string by joining together a list of smaller
-- strings and placing a delimiter between them.
join :: String -> [String] -> String
-- Create one big string by joining together a list of smaller
-- strings and placing a delimiter between them.
join :: String -> [String] -> String