[Perl] Конвертирование изображений

[apofis]

Как можно в Perl конвертировать изображения?
Например из .png в .jpg?

Пробовал так:

use Image::Magick;
my $image = Image::Magick->new;
my $x = $image->Read("picture.png");
$x = $image->Write("picture.jpg");

Но не могу нормально подключить Image::Magick. Никак не получается....

Какие-нибудь, кроме этого, методы существуют?

[Kaimi]

http://search.cpan.org/~lds/GD-2.44/GD.pm

[apofis]

http://search.cpan.org/~lds/GD-2.44/GD.pm
А можно рабочий пример конвертирования из одного формата в другой? А то чет не получается....

[Kaimi]

use GD;
my $image = GD::Image->newFromPng('file.png');
my $jpeg = $image->jpeg;

и $jpeg в файл

[apofis]

Вообщем, я тут сам посидел, подумал. Вот что в итоге получилось:

use GD;

open(PNG,"pic.PNG");
$im = newFromPng GD::Image(PNG);
open(PICTURE, ">pic.jpg");
binmode PICTURE;
print PICTURE $im->jpeg;
close PICTURE;

Работает отлично)

Kaimi, спасибо за помощь)