Module Version: 0.10
Image::JpegCheck - is this jpeg?
is_jpeg('foo.jpg'); # => return 1 when this is jpeg
Image::JpegCheck is jpeg file checker for perl.
Yes, I know. I know the Imager, GD, Image::Magick, Image::Size, etc.But, I need tiny one. I want to use this module in the mod_perl =)
Code is taken from Image::Size, and optimized it.
is_jpeg($stuff) validates your jpeg.stuff is:
scalarref: jpeg itself
file-glob: file handle
Path::Class::File: file object
Tokuhiro Matsuno <tokuhirom ah! gmail.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.