ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Sergey Kantarovich 2:5020/400 10 Apr 2001 14:29:37
To : All
Subject : Шаблоны
--------------------------------------------------------------------------------
Может кто подскажет как сделать такую вещь:
В текстовом файле хранится html шаблон из которого потом генерится
страничка. Задача: нужно что бы подпрограмма пробегала по файлу, находила
спецтеги %% СПЕЦТЕГ %% , заменяла их на значения локальных переменных и
отдавала уже обработанный текст основной программе.
Hапример:
<html><body><title> %%$title%%</title>
После выполнения подпрограммы должно стоять значение переменной $title
Что бы добавить в сл. код:
sub template{
my ($filename) = @_;
my $kod;
local $/;
local *F;
open(F,"< $filename") or die error("Hе найден файл шаблона
$filename");
$kod = <F>;
close(F);
..
????
...
return $kod;
}
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
| Тема: |
Автор: |
Дата: |
|
Шаблоны |
Sergey Kantarovich |
10 Apr 2001 14:29:37 |
 Hа: Шаблоны |
Oleg Bakiev |
10 Apr 2001 16:29:51 |
|
|
