Hallo,
Mach doch
$param =
sprintf("%dx%d", $x * .15, $y * .15);
und übergib dann $param an die Methode.
Es funktioniert jetzt. Scheint so, daß es wirklich irgendwie daran lag, daß es ein String anstatt einer Zahl war. also wegen dem sprintf .
So sieht es nun aus.
my $image = Image::Magick->new;
my $img = $image->Read( filename=>'alt1.jpg' );
my ($x, $y) = imgsize('alt1.jpg');
my ($width, $height) = ($x * .15, $y * .15);
$img = $image->Resize("$width x $height");
$img = $image->Write(filename=>'smallalt1.jpg' );
P.S. So wie es scheint, rundet das Modul die Zahlen automatisch, rauf bzw runter.
$xNeTworKx.