Perl module to guess file type (à la mod_mime_magic)

 File::MMagic::XS is a port of Apache2 mod_mime_magic.c in Perl, written in
 XS with the aim of being efficient and fast, especially for applications
 that need to be run for an extended amount of time.