コンテンツごとにファイルのMIMEタイプを判別する方法は？

Question

ファイルの内容によってMIMEタイプを判別する方法はありますか？たぶん、いくつかのHaskellライブラリで？

Answer 1

Haskell bindings to libmagicが問題の解決策になる場合があります。ここに例があります。

import Magic 
import System.Environment (getArgs) 

main = do 
    magic <- magicOpen [MagicMime] 
    (file:_) <- getArgs 
    magicLoadDefault magic 
    mime <- magicFile magic file 
    putStrLn mime