http://qs1969.pair.com?node_id=557458


in reply to image sizes (not local)

How about this: Download the image into a scalar and determine the image size from there.

#!/usr/bin/perl

use strict;
use warnings;

use LWP::Simple;
use Image::Size;

my $url = 'YOUR URL HERE';
my $img = get($url);

my ($width, $height) = imgsize(\$img);
print "$url is ${width}x${height}\n";

[download]

Replies are listed 'Best First'.
Re^2: image sizes (not local)
by sulfericacid (Deacon) on Jun 25, 2006 at 18:23 UTC
    Just out of curiousity I used your snippet but I can't get it to work. Are you sure you can get() and image and determine it's size without first storing it?


    "Age is nothing more than an inaccurate number bestowed upon us at birth as just another means for others to judge and classify us"

    sulfericacid
[reply]

      I used your snippet but I can't get it to work.

      The problem is with line 43b.

      Are you sure you can get() and image and determine it's size without first storing it?

      Quote Image::Size 3.0: "If the passed-in stream is a scalar reference, it is interpreted as pointing to an in-memory buffer containing the image data."

[reply]

In Section Seekers of Perl Wisdom