ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Comoderator of RU.CGI.PERL           2:5020/371.32  23 Nov 2000  14:36:18
 To : Ilia Sprite
 Subject : Re: как?
 -------------------------------------------------------------------------------- 
 

 <Ilia_Sprite@p7.f112.n5080.z2.fidonet.org> wrote:
 
 IS> я написал скрипт :)
 
 IS> === Hачало минного поля ===
 IS> #!/usr/bin/perl
 IS> $im = new GD::Image(88,31);
 IS> $orange = $im->ImageColorAllocate(255, 255,255);
 IS> $color = $im->ImageColorAllocate (51, 0, 0);
 IS> $redcolor = $im->ImageColorAllocate (202, 61, 61);
 IS> print "Content-type: image/gif\nExpires: 0\nPragma: no-cache\nCache-Control:
 IS> no-cache, must-revalidate\n\n";
 IS> binmode STDOUT;
 IS> print $im->ImageJPEG;
 IS> $im->ImageDestroy;
 IS> === Конец минного поля ===
 
 IS> как сделать так, чтобы картинка загружалась из файла "image.jpg" ?
 IS> в perldoc не посылать. обьясните русским языком.
 
 Оффтопик.
 
 -- 
 Artem Chuprina        2:5020/371.32 AKA cmrcp@ran.pp.ru        Артём Чуприна
 Comoderator of FIDOnet conference         Комодератор эхоконференции FIDOnet
                                 RU.CGI.PERL
 
 P.S. Русским языком не получится - оно на перле.
 
        $image = GD::Image->new($filename);
 --- ifmail v.2.14.os-p7-tma3
  * Origin: MemoNet (2:5020/371.32@fidonet)
 
 

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

Тема:    Автор:    Дата:    как?   Ilia Sprite   22 Nov 2000 17:02:32   Re: как?   Comoderator of RU.CGI.PERL   23 Nov 2000 14:36:18