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


ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Volkov Dmitry                        2:5020/400     22 Sep 2001  14:25:59
 To : All
 Subject : nph
 -------------------------------------------------------------------------------- 
 
 Hello, All!
 .
 
 Я написал вот такой скриптик
 =========================
 #!/usr/bin/perl
 #nph-test.cgi
 $delay=3;
 $boundary="sdfkgjhasdfkljgydflsjgh";
 $messagefile="/home/www/cgi-bin/messages.txt";
 select (STDOUT);
 $|=1;
 print "HTTP/1.0 200 Okay\n\n";
 print "Content-Type: multipart/x-mixed-replace\n\n";
 boundary=$boundary\n\n";
 print "--$boundary\n";
 while(1){
 print "\nContent-Type: text/html\n\n";
 print "<html><body>\n";
 open(FILE,"<$messagefile");
 $F=<FILE>;
 print "$F";
 close(FILE);
 print "</body></html>\n";
 print"\n--$boundary\n";
 sleep($delay);
 }
 ===========================
 
 в консоли работает нормально, а вот в броузер не выводит
 With best regards, Volkov Dmitry.  E-mail: vdv@nvkz.net
 --- ifmail v.2.15dev5
  * Origin: Novokuznetsk TTS (2:5020/400)
 
 

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

 Тема:    Автор:    Дата:  
 nph   Volkov Dmitry   22 Sep 2001 14:25:59 
 Re: nph   Michael B. Babakov   22 Sep 2001 14:34:03 
 nph   Denis Poznyakov   27 Sep 2001 13:31:59 
 Re: nph   Iliya Petrusenko   24 Sep 2001 12:46:50 
Архивное /ru.cgi.perl/1926478f57481.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional