Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/371.32  19 Jun 2000  15:50:33
 To : dmitriy@genphys.phys.msu.su
 Subject : Re: как сохранить гиф и как пользоваться шрифтами
 -------------------------------------------------------------------------------- 
 
 dgpms> #!/usr/bin/perl -w
 dgpms> $url = "http://www.prao.psn.ru/images/22vla.jpg";
 dgpms> $test="/usr/home/dmitriy/public_html/testing/a.jpg";
 dgpms> use LWP::Simple;
 dgpms> $page = get "$url";
 dgpms> open(ABC, "<$test");
 dgpms> binmode(ABC);
 dgpms> binmode(STDOUT);
 dgpms> while (read(ABC, $buff, 8*2*10))
 dgpms> {
 dgpms> print STDOUT "Content-Type: image/jpeg";
 dgpms> print STDOUT $buff;
 dgpms> }
 dgpms> close (ABC);
 
 dgpms> Hа что, сволочь, пишет:
 dgpms> "img.pl" 12 lines, 343 characters
 dgpms> bash-2.03$ ./img.pl
 dgpms> Name "main::page" used only once: possible typo at ./img.pl line 5.
 dgpms> bash-2.03$
 
 dgpms> Почему не работают??? Все права прописаны.
 
 Потому что запрос типа GET не предоставляет возможности залить файл на сервер.
 Hа то он и GET.
 
 dgpms> Другой вопрос сабжа, где можно толково прочесть именно про работу с
 dgpms> графикой cgi.pm?  нужно сделать так, чтобы скрипт реагировал на
 dgpms> символы, ввобдимые в форму(#alfa# #beta# #integral#) и выдавал их в
 dgpms> качестве картинок.
 
 s/#(\w+)#/<img src="$1.gif" alt="#$1#">/g;
 
 dgpms> Как добраться до фонтов в unix, и есть ли вообще в cgi.pm возможность
 dgpms> работать со шрифтами, аналогичными вордовским symbol, garamound  и пр.?
 
 А это смотря что и куда ты собираешься отображать. Если в браузер клиенту,
 сидящему под Win* (себе, например), то зачем тебе шрифты в unix? А если в
 гуёвое приложение под UNIX, то тебе в RU.UNIX. Применительно к эхотагу - man
 Tk и далее.
 
 dgpms> или мне man perl читать нужно?
 
 RFC2616. Или хотя бы FAQ. А заодно стандарт HTML (www.w3.org). И пока не
 научишься отличать HTML от DOC, больше никуда не писать. Впрочем, man perl
 тоже полезно. Он тебе расскажет, где что искать. Он коротенький, не бойся.
 
 -- 
 Счастливо!
   Ран.
 --- ifmail v.2.14.os-p7-tma3
  * Origin: MemoNet (2:5020/371.32@fidonet)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Re: как сохранить гиф и как пользоваться шрифтами   Artem Chuprina   19 Jun 2000 15:50:33 
Архивное /ru.perl/347332ebfa9f.html, оценка 3 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional