-- |
-- Base64 encoding.
--
-- >>> encode "foo bar"
-- "Zm9vIGJhcg=="
encode :: String -> String
encode = map (base64array !) . encode' . map (fromIntegral . ord)
encode :: String -> String
encode = map (base64array !) . encode' . map (fromIntegral . ord)
encode = map (base64array !) . encode' . map (fromIntegral . ord)