Помогите с Perl-ом
 

У меня сайт на HTML, но использует PERL: <!--#include virtual="/cgi-bin/скрипт.cgi" -->
Естественно, в .htaccess уже прописано:
AddHandler server-parsed htm
Если я туда еще AddHandler application/x-httpd-php .htm вставлю, работать не будет.

Итак, скопировал папку, содержащую файл SAPE.pm, в корень сайта, и поставил ей атрибуты 777. В /cgi-bin/ создал файл reklama.cgi:

#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
"$ENV{DOCUMENT_ROOT}/имя_папки/SAPE.pm" =~ /^(.+)$/;
require $1;
my $sape = new SAPE(user => 'имя_папки');
print $sape->get_links;

А в ту страницу, которую хочу продать, поставил:
<!--#include virtual="/cgi-bin/reklama.cgi" -->

Открыл страницу браузером - все ок, никаких ошибок 500.

Теперь говорю "добавить сайт" - ругается: "Укажите полный УРЛ любой страницы сайта, на которой заведомо установлен код!". Ок, указываю УРЛ продаваемой страницы. Говорит: "Проверьте корректность установки кода и попробуйте ещё раз!". Что системе не нравится?

Попробуй скрипт делать так:

#!/usr/bin/perl
use warnings;
use strict;
print "Content-type: text/html; charset=windows-1251\n\n";
require "Полный путь до SAPE.pm";
my $uri = $ENV{REQUEST_URI} || "";
my $sape = new SAPE(
user => 'Имя папки',
uri => $uri,
force_show_code => '1',
filename => 'Полный путь до links.db',
host => 'http://твой_сайт.ru'
);
print $sape->get_links;

И в нужном месте смотри появления комментария, вместо кода сапы. Если коммент есть - значит код установлен верно.

Месье, снимаю шляпу. Все заработало :D

Всегда пожалуйста.