MIME-Types is a Perl extension for determining MIME types
