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

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
[Perl] Конвертирование изображений

Опции темы

Поиск в этой теме

Опции просмотра

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

05.01.2010, 07:47

apofis

Познающий

Регистрация: 23.02.2009

Сообщений: 35

С нами: 9059503

Репутация: 0

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

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

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

Код:

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

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

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

𝕏 Twitter Reddit Telegram Копировать ссылку

05.01.2010, 14:12

Kaimi

Познавший АНТИЧАТ

Регистрация: 23.08.2007

Сообщений: 1,237

С нами: 9851426

Репутация: 1676

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

05.01.2010, 14:58

apofis

Познающий

Регистрация: 23.02.2009

Сообщений: 35

С нами: 9059503

Репутация: 0

Цитата:

Сообщение от Kaimi

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

А можно рабочий пример конвертирования из одного формата в другой? А то чет не получается....

05.01.2010, 15:34

Kaimi

Познавший АНТИЧАТ

Регистрация: 23.08.2007

Сообщений: 1,237

С нами: 9851426

Репутация: 1676

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

и $jpeg в файл

05.01.2010, 15:48

apofis

Познающий

Регистрация: 23.02.2009

Сообщений: 35

С нами: 9059503

Репутация: 0

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

use GD;

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

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

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

Предыдущая тема Следующая тема

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Новости Софта	Dimi4	Мировые новости. Обсуждения.	3801	12.06.2022 05:08
Печать изображений (быстрый редактор изображений)	ZnikiR	Болталка	3	09.12.2009 07:28
Открытая реализация нейронной сети для распознавания изображений	darkwkz	Мировые новости. Обсуждения.	7	14.10.2009 03:56
Brute admin password [perl]	Звeрь	PHP	7	02.02.2009 13:01

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Быстрый переход