File::MimeInfo::Simple - Simple implementation to determine file type
use File::MimeInfo::Simple; say mimetype("/Users/damog/vatos_rudos.jpg"); # prints out 'image/jpeg' say mimetype("C:\perl\foo.pl") # prints out 'application/x-perl'
File::MimeInfo::Simple is a much simpler implementation and uses a much simpler approach than
File::MimeInfo, using the 'file' command on a UNIX-based operating system. Windows uses a key-value list for extensions. It's inspired on Matt Aimonetti's mimetype-fu used on Ruby and the Rails world.
mimetype is exported by default. It receives a parameter, the file path. It returns an string containing the mime type for the file.
David Moreno <email@example.com>.
Copyright 2009 David Moreno.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.