Perl template toolkit

@mustafa24 · Регистрация: 29.03.2009

Студворк — интернет-сервис помощи студентам

Делаю сайт. Индекс сайта начинает с
index.pl Содержимое в index.pl

Perl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#use Template;
 
my $tt2 = Template->new({
    INCLUDE_PATH => '/usr/local/www/zones/tmpl',
    INTERPOLATE  => 1,
}) || die "$Template::ERROR\n";
 
my $vars={
    title=>'КиноХроника',
    INTERPOLATE  => 1,
    items=>['Один', 'Два', 'Три']
};
 
 
 
print "Content-type: text/html\n\n";
 
$tt2->process('index.tt2', $vars) || die $tt->error(), "\n";

Содержимое в index.tt2 (это темплейт тулкит)

Code
1
2
3
4
[% WRAPPER _0wrap.tt2 %]
 
 
[% END %]

Содержимое в файле _0wrap.tt2Сам код html

HTML5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="ru" xml:lang="ru">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"/>
<title>$title</title>
<link rel="stylesheet" href="css/style.css" type="text/css"/>
</head>
<body>
 
<div style="height: 22px; padding-top: 50px; background-image: url(/htdoc/img/menu_line.jpg); background-repeat: repeat-x; background-position: bottom;">
<span style="margin-left: 5px; font: normal 12px Tahoma; color: red;">&raquo;</span> 
<a class="nav"  href="/anime.pl">Аниме</a></div>
 
[% content %]
 
 
</body>
</html>

Так вот проблема такая что на каждый tag a href приходится создавать отдельные файлы с расширением pl что бы при клике выполнялось все сначала и добавлялось новый темплейт.

Требуетя помошь специалиста. Как организавать все это, как создать систему управления сайта? Что бы все ссылки были в одном выпоняюшем pl файле а то их накопилось очень много.
Спосибо.

@chorny · 25.05.2009, 23:42

Как мне кажеться, нужно использовать какую-то систему типа CGI::Application или Catalyst.

Новые блоги и статьи Все статьи Все блоги /
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .

@chorny 7 / 7 / 0 Регистрация: 25.05.2009 Сообщений: 15
	25.05.2009, 23:42
	Как мне кажеться, нужно использовать какую-то систему типа CGI::Application или Catalyst. 0