2013-02-23 39 views

Trả lời

7

Haskell bindings to libmagic có thể là giải pháp cho vấn đề của bạn. Đây là một ví dụ.

import Magic 
import System.Environment (getArgs) 

main = do 
    magic <- magicOpen [MagicMime] 
    (file:_) <- getArgs 
    magicLoadDefault magic 
    mime <- magicFile magic file 
    putStrLn mime 
Các vấn đề liên quan