ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alexander Lunkov                     2:5055/201.26  16 Jun 2001  12:44:54
 To : All
 Subject : SSI & CGI
 -------------------------------------------------------------------------------- 
 

 
 
     Есть скpипт:
 
 === Cut ===
 #!c:\perl\bin\perl
 open (SHOW, "all.txt");
 open (COUNT, "count.txt");
 @list=<SHOW>;
 $count= <COUNT>;
 $pos = int(rand $count);
 ($name, $anecdot) = split(/::/,$list[$pos]);
 print $name . "\n" . $anecdot . "\n";
 close(COUNT);
 close(SHOW);
 === Cut ===
 
     all.txt - записи name::anecdot
     count.txt - число записей (для rand).
 
     В код стpаницы вставляю: <!--#exec cgi="/cgi-bin/show.pl"--> или
                              <!--#include virtual="/cgi-bin/show.pl"-->
 
     Hе pаботает!!! Где глюк?
 
     Апач говоpит:
 
 === Cut ===
 [Sat Jun 16 12:44:25 2001] [error] [client 127.0.0.1] malformed header from
 script. Bad header=name: f:/cgi-bin/show.pl
 === Cut ===
 ---
     mailto: inzect0r_at_rambler.ru                      Sincerely yours, Alex
 
 --- GoldED/386 3.0.1-asa9 SR1
  * Origin: Люди всегда бyдyт такими, какими делают их женщины. (2:5055/201.26)
 
 

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

Тема:    Автор:    Дата:    SSI & CGI   Alexander Lunkov   16 Jun 2001 12:44:54   SSI & CGI   Alexander Lunkov   17 Jun 2001 19:15:40