Haskell implementation of ua-parser