|
Мдя.... задачка.
Тут мне тебе писанины минут на сорок, млин.
Короче, первая строка: путь к интерпритатору Perl, если хостинг на юниксе - оставь как есть, скорее всего. Можешь узнать у хостера точный путь.
На виндах это может выглядеть таким образом:
#!D:/perl/bin/perl.exe
Далее. Нужно прописать пути. Не УРЛы, а пути.
Вот, например:
# this is the url of your site
$base_url = 'http://127.0.0.1';
# this is the path equivalent of $base_url
$base_dir = 'D:/0WWW';
# this is the url of fetch.pl
$search_url = 'http://127.0.0.1/cgi-bin/fetch.pl';
# this is the path to header.shtml
$header = 'D:/0WWW/header.shtml';
# this is the path to footer.shtml
$footer = 'D:/0WWW/footer.shtml';
# the background color of fetch... behind the keyword field
$bg = 'bgcolor=#800000';
# the directories you want to search in, note the trailing "/"
# you cannot search only '' as a directory and expect it to
# search all of your directories if you have $subdirs set to
# yes... you must specify directories
#@dirs = ('','directory1/','directory2/subdir1/','directory3/');
@dirs = ('');
# allow fetch to search in subdirectories of the above
# directories?
$subdirs = "yes";
# what types of files do you want to search in? note that
# htm works for htm, html, phtml, shtml, etc...
@searchtypes = ('htm','html');
######################################################
Т.е. у меня этот скрипт лежит в директории cgi-bin, что скорее всего и у тебя должно быть, иначе может не запуститься. Опять же хостер знает куда положить.
Корень моего веб-сервера находится в папке D:/0WWW
А искомые директории я тут закомментировал, а указал что искать везде от корня и далее по всем поддиректориям. Соответственно включен поиск по субдирам ($subdirs = "yes";)
Ну а дальше в браузере адрес скрипта набираешь ($search_url ) который и всё .
Ну вот, а я боялся, всего-то пять минут :)
__________________
Ничто не даётся нам с таким трудом, как то, что не даётся.
Best regards!
2008 © Roman V. Brooks
Последний раз редактировалось WMRomik; 16.10.2003 в 09:04.
|