[perl] Image magick

[Verwijderd]

Ik krijg hetvolgende maar niet voor mekaar
Ik wil elke tekening in een array naar een png omzetten met een instelbare size.

foreach $temp (@tmp) {
($pre, $post) = split(/\./ , $temp);
$post =~ tr/A-Z/a-z/;

if ($post eq "bmp") {
&debugln("bmp");

my $image = Image::Magick->new;

$image->Read('e:/www/tmp/kickass.bmp');
$image->convert('bmp:kickass.bmp png:kickass.png');
$image->Write('e:/www/tmp/kickass.png', compression=>'None');


Helaas zijn over image magick weinig goede voorbeelden te vinden. Kan iemand me op de goede weg helpen ?

Bedankt
}

[Juup]

Lukt het je wel om 1 bmp naar png te converteren? BEgin daar eens mee.

Wat krijg je voor foutmelding?

[Verwijderd]

ik krijg geen foutmelding vandaar mijn probleem.

Ik zal je raad opvolgen... en eens met 1 piccie beginnen ...

[jvhaarst]

Wat je nu doet is veel makkelijker op te lossen door gewoon convert op de commandline aan te roepen.
zo dus : my $dummy=`convert konijn.bmp konijn.png`;
Is waarschijnlijk nog een stuk sneller ook...

[Juup]

Op donderdag 25 juli 2002 19:55 schreef jvhaarst het volgende:
Wat je nu doet is veel makkelijker op te lossen door gewoon convert op de commandline aan te roepen.
zo dus : my $dummy=`convert konijn.bmp konijn.png`;
Is waarschijnlijk nog een stuk sneller ook...

Heh bah! Niet erg perl-ish he?

[jvhaarst]

TIMTOWTDI

Maar je hebt gelijk, het is natuurlijk netter om het met perlmagick te doen, maar ach, zo kan het ook.