Externe Dateien prüfen

[Gustl]

Hey,

Wenn ich die Kantenlänge eines Bildes lesen will muss ich die Datei zwischenspeichern, dann lesen, dann wieder löschen
Dateien sind nicht nötig.

#!perl -T

use strict;
use diagnostics;

use Image::Size qw(imgsize);
use LWP::Simple qw(get);

my $uri = 'http://www.w3.org/Icons/valid-xhtml10';
my ($x, $y, $type);

{
    my $img = get $uri;

if (defined $img) {
        ($x, $y, $type) = imgsize $img;
    } else {
        die "could not retrieve <$uri>";
    };
};

>   

\--  
  
Hi, also jetzt vom durchlesen trifft das den Nagel auf den Kopf. Werds morgen mal probieren.  
  
Wobei ja get auch irgendwo n temporär-file anlegt und es wohl gleich nach dem lesen mit imgsize wieder verwirft. Das hat meine andere Frage dann auch gleich beantwortet !  
  
Schönen Dank, Gustl