|
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) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/347332ebfa9f.html, оценка из 5, голосов 10
|