File::Type::WebImages - determine web image file types using magic
use File::Type::WebImages 'mime_type';
my $type_1 = mime_type($file);
my $type_2 = mime_type($data);
mime_type() can use either a filename, or file contents, to determine the
type of a file. The process involves looking the data at the beginning of the file,
sometimes called "magic numbers".
For minimum memory consumption, only the following common web image file types are supported:
BMP, GIF, JPEG and PNG. ( image/bmp, image/gif, image/jpeg and image/png ).
Unlike with the File::Type manpage and the File::MMagic manpage, 'undef', not "application/octet-stream" will be returned for unknown formats.
Unlike the File::Type manpage, we return "image/png" for PNGs, not "image/x-png";
If you want more mime types detected use the File::Type manpage or some other module.
It would be even better to have a pluggable system that would allow you to plug-in different sets of MIME-types you care about.
the File::Type manpage. Similar, but supports over 100 file types.
File::Type::WebImages is built from a mime-magic file from cleancode.org. The original can be found at http://cleancode.org/cgi-bin/viewcvs.cgi/email/mime-magic.mime.
Paul Mison <pmison@fotango.com> - wrote original File::Type Mark Stosberg <mark@summersault.com> - hacked up this.
Copyright 2003-2004 Fotango Ltd.
Licensed under the same terms as Perl itself.