Thread Perl Image::Magick Bildausrichtung aulesen (22 answers)
Opened by DarAvanger05 at 2014-03-06 17:56

Linuxer
 2014-03-08 22:23
#173911 #173911
User since
2006-01-27
3854 articles
HausmeisterIn

user image
Es bleibt verwirrend.

Dein letztes Problem war doch, die Bildgröße zu ermitteln; da hast Du nichts bekommen und jetzt baust Du alles um und hast wieder an anderer Stelle ein ganz anderes Problem.
Versuch doch mal nicht immer wieder ein neues Rad zu erfinden, sondern bleibe erstmal bei einem Ansatz und verfolge und verfeinere den weiter.

Nimm also Deinen vorigen Code und werfe da das imgsize()-Zeug raus und verwende stattdessen die Get()-Methode:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#! /usr/bin/perl
use strict;
use warnings;

use Image::Magick;


my $imageFile = "/dev/shm/test.jpg";

my $image = new Image::Magick;

my $res = $image->Read($imageFile);
warn $res if $res;

$res = $image->Scale('100 x 100');
warn $res if $res;


my ($x, $y) = $image->Get('width', 'height');
printf "$x...$y\n";
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

View full thread Perl Image::Magick Bildausrichtung aulesen