Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

gif with perl

0 views
Skip to first unread message

Alexey Volkogon

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
Hi, All!

Как работать с гифами в перле?
Как на существующую картинку добавить текст?
Как вывести на гиф текст под углом?

Спасибо

reallyalexpro
ICQ#46555014

vi...@ice.ru

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
Alexey Volkogon <al...@overmind.kiev.ua> wrote:
AV>Hi, All!

AV>Как работать с гифами в перле?

Установить модуль GD
AV>Как на существующую картинку добавить текст?

Прочитать доку на него.

AV>Как вывести на гиф текст под углом?
А вот это не знаю. Может быть последние версии GD уже научились.

А я лично такие вещи делаю посредством генерации Postscript-файла
типа вот такого:

/Times-Roman findfont 12 scalefont setfont
100 100 moveto
45 rotate
(некий текст) show

и скармливанием его ghostscript.
AV>Спасибо

AV>reallyalexpro
AV>ICQ#46555014

--
--------------------------------------------------
Victor Wagner vi...@ice.ru
Programmer Office:7-(095)-203-51-19
Institute for Commerce Home: 7-(095)-135-46-61
Engineering http://www.ice.ru/~vitus

vi...@ice.ru

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
vi...@ice.ru wrote:

vir>Alexey Volkogon <al...@overmind.kiev.ua> wrote:
AV>>Hi, All!

AV>>Как работать с гифами в перле?

vir>Установить модуль GD


AV>>Как на существующую картинку добавить текст?

vir>Прочитать доку на него.

AV>>Как вывести на гиф текст под углом?

vir>А вот это не знаю. Может быть последние версии GD уже научились.


Научились. Вот сейчас поставил себе свежую версию GD (1.23) и
libgd 1.73 и оно радостно рисует русский текст под сорок пять градусов
трутайповским шрифтом с антиалиасингом.

Единственное но - если шрифт юникодовский (а большинство стандартных ttf
- именно такие, то русские буквы приходится заменять на нечто невообразимо страшное
Например, слово "Русский" на
&#1056;&#1091;&#1089;&#1089;&#1082;&#1080;&#1081;

Если кого интересует, то это делается в перле посредством

$text=~s/(\200-\377)/&#$map{$1}/g;
где $map - массив, оторбражающий символы вашей текущей кодировки на
десятичные коды Unicode. Последний делается следующим образом - берется
файл определения charset с ftp.unicode.org (или из дистрибутива catdoc)
и делается ему

s/^(\S+)\s+(\S+)\s+(.*)$/chr($1) => $2, $3/;

То что получилось втыкается в ваш скрипт в качестве

%map=(
....
);

Alexey Volkogon

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
А примерчик можно?

reallyalexpro
ICQ#46555014

Alexey Volkogon

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
> Установить модуль GD
а где взять?


reallyalexpro
ICQ#46555014

Alex Farber

unread,
Nov 12, 1999, 3:00:00 AM11/12/99
to
Alexey Volkogon wrote:
> А примерчик можно?

А что конкретно в "perldoc GD" ты не понял?

/Алекс НОВЫЙ АДРЕС
\
-- \
Собираю статьи про Perl, базы данных и т. п. на http://simplex.ru/news/
Собираю адреса газет и журналов на http://www.friends-partners.org/lit/

WCS Master

unread,
Nov 14, 1999, 3:00:00 AM11/14/99
to
On Fri, 12 Nov 99 17:59:10 +0300, vi...@ice.ru wrote:

>AV>>Как вывести на гиф текст под углом?
>vir>А вот это не знаю. Может быть последние версии GD уже научились.
>
>

>Hаучились. Вот сейчас поставил себе свежую версию GD (1.23) и


>libgd 1.73 и оно радостно рисует русский текст под сорок пять градусов
>трутайповским шрифтом с антиалиасингом.

Ага, только вот начиная с GD 1.2 они выдают картинки в PNG. Посему
такой вопрос:
Можно ли GD 1.23 приучить к GIF'у или же есть ли какой-нить перловый
модуль для конвертации PNG2GIF?

vi...@ice.ru

unread,
Nov 15, 1999, 3:00:00 AM11/15/99
to
WCS Master <il...@chat.ru> wrote:
WM>On Fri, 12 Nov 99 17:59:10 +0300, vi...@ice.ru wrote:
WM>Ага, только вот начиная с GD 1.2 они выдают картинки в PNG. Посему
WM>такой вопрос:
WM>Можно ли GD 1.23 приучить к GIF'у или же есть ли какой-нить перловый
По-моему, проще посмотреть в agent-log, убедиться что третьим Netscape
к тебе ходит 0.1 процент пользователей и наплевать на гифы. Заодно этим
ты покажешь большую фигу Unisys.


WM>модуль для конвертации PNG2GIF?

PerlMagic называется.


--

Ilya Rubtsov

unread,
Nov 15, 1999, 3:00:00 AM11/15/99
to
On 15 Nov 1999 12:10:51 +0300, vi...@ice.ru wrote:
Блин, опять агент не смог всё проквотить...

>PerlMagic
Пасыба, дарагой. А вот есть на CPAN'е такая вестщь:
Image JCRISTY PerlMagick-4.28.tar.gz 479k 17 Jul
1999
Это, как я понял, ОНО.
А на эктивстайтовском серваке есть другая:
9/30/99 2:48 AM 1253864 Image-Magick.zip

Подозреваю, что это одно и то же. Но размеры файлов говорят об
обратном. Но поставить я могу только Image-Magick.zip -- посредством
PPM из Активного Перла. А вот модуль со CPAN'а я поставить не могу,
т.к. не умею. Там же ж надо make делать, а у меня винда :( Есть правда
прога make, которая вроде как ко мне с борландовской Сёй пришла, но
она всегда дает еррору. ИМХО она где-то внутри поломалась...
Так вот, кто научит ставить под винду модули, взятые со CPAN'а?

Ilya Rubtsov

unread,
Nov 15, 1999, 3:00:00 AM11/15/99
to
On 15 Nov 1999 15:42:06 +0300, il...@chat.ru (Ilya Rubtsov) wrote:

>Image JCRISTY PerlMagick-4.28.tar.gz 479k 17 Jul

>9/30/99 2:48 AM 1253864 Image-Magick.zip

^^^С этим я уже вроде вс:е понял.
Но плз, ткните меня носом в примерчик конвертации image.png в
image.gif , а? Оч хоца... :о)

Alex Scherbakov

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
Hi многоуважаемый, WCS Master

WCS Master <il...@chat.ru> писал



> Ага, только вот начиная с GD 1.2 они выдают картинки в PNG. Посему

> такой вопрос:


> Можно ли GD 1.23 приучить к GIF'у или же есть ли какой-нить перловый

> модуль для конвертации PNG2GIF?

Конечно можно, просто поменяй в конце кода надпись PNG на GIF...
Вот и все...

#### Да и прибудет с Вами виликий Коннектий!!! #### Contacts: al...@azdata.net

Alex Scherbakov

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
Hi Alexey Volkogon <al...@overmind.kiev.ua> вы писали:

> > Установить модуль GD
> а где взять?

http://www.boutell.com/gd/gd.html
ftp://ftp-genome.wi.mit.edu/pub/software/WWW/GD.pm.tar.gz
http://www.genome.wi.mit.edu/ftp/pub/software/WWW/GD.html
http://www.perl.com/CPAN/modules/by-module/GD
http://stein.cshl.org/WWW/software/GD/GD.html

Ищите, если, что то обращайтесь. Буду рад помочь....

С Уважением,
Алексей (ака Виконт)

Anthony Dragunov

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
Hello WCS!

Воскресенье Hоябрь 14 1999 15:26, WCS Master wrote to All:

WM> Ага, только вот начиная с GD 1.2 они выдают картинки в PNG. Посему
WM> такой вопрос:
WM> Можно ли GD 1.23 приучить к GIF'у или же есть ли какой-нить перловый


WM> модуль для конвертации PNG2GIF?

а чем PNG не устроил? браузерами - показывается. лицензионно чист. в отличие
от.

Anthony (ant...@chmes.elektra.ru)
HackZone RC5 Team member // www.tekmetrics.com ID #114 / понты дешевые

Ilya Rubtsov

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
On Tue, 16 Nov 99 14:52:38 +0300, Anthony Dragunov
<Anthony....@p111.f1.n5010.z2.fidonet.org> wrote:

> а чем PNG не устроил? браузерами - показывается. лицензионно чист. в отличие

Заказчик так захотел -- он считает что PNG не поддерживается очень
многими броузерами...

Serge Shikov

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
vi...@ice.ru wrote:
>
> По-моему, проще посмотреть в agent-log, убедиться что третьим Netscape
> к тебе ходит 0.1 процент пользователей и наплевать на гифы. Заодно этим
> ты покажешь большую фигу Unisys.
Да уж, Unisys будет очень огорчен ;-)

Alexey Volkogon

unread,
Nov 16, 1999, 3:00:00 AM11/16/99
to
Это все конечно хорошо.
Но меня интересует модуль, который можно использовать в Win32, вернее
отлаживать скрипты в Win32 и использовать в Unix.

Serge Shikov

unread,
Nov 17, 1999, 3:00:00 AM11/17/99
to
Ilya Rubtsov wrote:
>
> >PerlMagic
> Пасыба, дарагой. А вот есть на CPAN'е такая вестщь:
> Image JCRISTY PerlMagick-4.28.tar.gz 479k 17 Jul
> 1999
> Это, как я понял, ОНО.
> А на эктивстайтовском серваке есть другая:
> 9/30/99 2:48 AM 1253864 Image-Magick.zip
>
> Подозреваю, что это одно и то же. Но размеры файлов говорят об
> обратном.
Вообще-то во втором могут быть например собранные бинарники, а в первом
- только исходники.

> Но поставить я могу только Image-Magick.zip -- посредством
> PPM из Активного Перла. А вот модуль со CPAN'а я поставить не могу,
> т.к. не умею. Там же ж надо make делать, а у меня винда :(

Это не оправдание ;-)

> Есть правда
> прога make, которая вроде как ко мне с борландовской Сёй пришла, но
> она всегда дает еррору. ИМХО она где-то внутри поломалась...
> Так вот, кто научит ставить под винду модули, взятые со CPAN'а?

Это не просто, а очень просто. Ставишь MSVC (например 5.0 сойдет), там
nmake в комплекте, CPAN-овские модули про это знают и ставятся отлично
(хотя у меня лично перл не активстейтовский).

vi...@ice.ru

unread,
Nov 17, 1999, 3:00:00 AM11/17/99
to
Alexey Volkogon <al...@overmind.kiev.ua> wrote:
AV>Это все конечно хорошо.
AV>Но меня интересует модуль, который можно использовать в Win32, вернее
AV>отлаживать скрипты в Win32 и использовать в Unix.

Так кто ж тебе мешает скачать cygnus GCC, собрать им и perl и GD
и отлаживать что угодно под Win32?

(Конечно, мешает лень. Поставить второй операционкой на ту же машину
Linux или FreeBSD - проще)

Anthony Dragunov

unread,
Nov 17, 1999, 3:00:00 AM11/17/99
to
Hello Ilya!

Вторник Hоябрь 16 1999 16:25, Ilya Rubtsov wrote to All:

>> а чем PNG не устроил? браузерами - показывается. лицензионно чист. в
>> отличие

IR> Заказчик так захотел -- он считает что PNG не поддерживается очень
IR> многими броузерами...

ну и неправильно он решил. еще раз повторю - за .gif могут покусать...
не факт, конечно, но могут. а многими - это какими? IE3.0 и Netscape 3.0 ?
дык, люди - 1999 год заканчивается все-таки...

Serge Shikov

unread,
Nov 19, 1999, 3:00:00 AM11/19/99
to
Alexey Volkogon wrote:
>
> Это все конечно хорошо.
Что "это"?

> Но меня интересует модуль, который можно использовать в Win32, вернее

> отлаживать скрипты в Win32 и использовать в Unix.

Можно было и отквотить что-нибудь... А то фиг поймешь, что ты хотел
сказать. Пока все предложенные советы вполне способны работать под
Win32.

Serge Shikov

unread,
Nov 19, 1999, 3:00:00 AM11/19/99
to
Ilya Rubtsov wrote:
>
> > а чем PNG не устроил? браузерами - показывается. лицензионно чист. в отличие
> Заказчик так захотел -- он считает что PNG не поддерживается очень
> многими броузерами...
Это теми, которых примерно 1%? ;-) Их только в версиях много, а в штуках
- давно уже близко у нулю.

0 new messages