Your question is a bit unclear. There are two possible questions that come to mind :

Can Perl determine the file size of a gif/jpeg/bmp image ?

Yes. There is the -s function, which returns the size of the file. Use it as follows : 

#!/usr/bin/perl -w
use strict;

my $filename = "test.gif";
my $size = -s $filename;

print $size, "\n";

[download]

The other possible question would be :

Can Perl determine the image dimensions of a gif/jpeg/bmp image ?

Perl can do this as well. There are a many ways to get the image dimensions, hard ways and easy ways. One particular extensive way, which will help you to find the sizes of many image types is the use of the Image::Magick module (do a web search on Perlmagick to find it). ImageMagick can handle about every common image type you will encounter. It might be overkill for your needs. There is also the Image::Size module, which is more lightweight and will tell you only the dimensions of certain image types. And as a third method, you could always program it yourself, but I recommend having a look at Image::Size first.

In reply to Size of an image (Corion) by Corion
in thread fireserver by fireserver

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.