�� Template Toolkit : �� Template Toolkit

Template::Plugin::XML::RSS

Wed, 7 Dec 2005 11:19:46 GMT

�� Template::Plugin::XML::RSS �� Template �� UTF-8. �� . �� RSS �� koi-8-r ��.
�� XML::RSS->new (encode => '��_��') ::RSS->new ( output => '��_��') �� :-(
�� DEBUG_ALL �� . � �� . .�.�. �� TT2

�� -�� TT2-�� $output ?

�� :
[% USE news = XML.RSS('forum_1.xml') %]
[% FOREACH item = news.items %]
<pre>
[% item.title %]
</pre>
[% END %]

�� include-��

Thu, 1 Dec 2005 09:33:45 GMT

� �� . �� (�� 10) �� . �� TT2. �� templates ��.
�� (�� ).
�� , �� 10 ��.

�� include �� TT �� (�� template), � �� - � �� (�� template)?

template Factory

Thu, 17 Nov 2005 05:29:38 GMT

�� Factory (�� , � �� ),
�� -�� . �� BLOCK...END � �� .
�.�. �� (INCLUDE) ��-�� "�� "
�� -�� Template::Context �� BLKSTACK, �� ţ �� , ��:
foreach my $i ($template->service->context()->BLKSTACK) {
.....
}

�� .

Sun, 6 Nov 2005 18:33:25 GMT

�� . � �� Template

��
PLUGINS=>{
'Atma'=>'Atma::TPlugin'
},
� � ��
[% USE Atma(c) %]
[% Atma.myfunc("lalala")%]

��
� �� USE Atma(c)
# LOAD_PLUGINS => Atma::TPlugin->new($self, $self),
�� -�� fetch, �� ?

� �ݣ �� ??

Tue, 1 Nov 2005 15:03:41 GMT

��:)

�� TT

Tue, 1 Nov 2005 15:02:06 GMT

�� TT??
� ��
messages.en
[% mess1="English1" %]
[% mess2="English2" %]

messages.ru
[% mess1="��1" %]
[% mess2="��2" %]

� � ��
[% IF lang == "en" ][% INCLUDE messages.en %][% END %]
<html>
[% mess1 %]
</html>
�� !! �� ?
��

��

Thu, 27 Oct 2005 11:48:26 GMT

��-�� view? �� , �� "��" ��. �� ?

Template Toolkit �� winXP

Wed, 28 Sep 2005 15:05:48 GMT

�� .
�� – �� Template Toolkit �� winXP?
� �� ActivePerl 5.8.6.
�� PPM. � �� PPM-�� :
Ppm-> install Template
Ppm-(��:) – �� !!!
��
Ppm-> install TemplateToolkit
Ppm-(��:) – �� !!!
�� Template Toolkit �� winXp.
��

fork() � [% PERL %]

Sun, 25 Sep 2005 11:50:06 GMT

��, ��, �� fork() � �� [% PERL %] TT?

�� , � �� .

� �� $stash �� , �� fork �� . �� , �� .

TT �� .

Wed, 21 Sep 2005 11:45:38 GMT

�� , �� , �� .
�� :
{params}->{year}->'2005';
� ��
[% params.year %]

� �� 25! �� 1998, �� 1998, � �� 20010007, �� 217!

��-�� ? �� ?

eval() � TT2

Thu, 15 Sep 2005 12:41:43 GMT

�� TT2 �� eval() � Perl? �. �. �� , �� , �� , �� , � �� ?

��

Wed, 31 Aug 2005 11:47:31 GMT

��
��
��
��
��
[% INCLUDE tmpl(para1=>value,para2=>value2,...) %]

INCLUDE

Mon, 8 Aug 2005 04:57:04 GMT

�� WRAPPER �� BLOCK...END �� INCLUDE.
�� -�� setter-getter �� , �� WRAPPER �� ...

PS: PROCESS �� .

PPS: �� , � �� .

�� ? � �� i=i-1

Fri, 22 Jul 2005 12:42:52 GMT

�� ? (�� )
��, ��:

[%SET i="aaa"."bbb" %]

��������:
unexpected token (.)

� ��. ��

[% i=i-1 %]:

file error - parse error - articles/index.html line 32: unexpected token (-1)  [% i=i-1 %]

�� ?
�� [% i=i+1 %] ��!
�� -- � ++ �� :(

�� template toolkit 2.14

Bug �� Feature ? �� $_, $! � �.�.

Mon, 18 Jul 2005 06:24:54 GMT

��:
[% PERL %]
$_ = 'test';
$stash->set(msg => $_);
[% END %]
<div>[% msg %]</div>
--------------------
tpage --eval_perl
��
Segmentation fault

�� (� ��)

Thu, 14 Jul 2005 07:48:40 GMT

��
[% a=10 %]
[% b=5 %]

[% c=a/b %]

�� . �� .
� �� ?

Unit Tests

Thu, 14 Jul 2005 03:03:52 GMT

�� UnitTest-� �� .
� �� UnitTest-�� (�� *.pm)
�� , �� WEB-��?

mod_perl, �� TT2

Mon, 11 Jul 2005 08:56:40 GMT

�� handler ��
� ��.

package My::controller;
our $c; # �� , ��

sub handler($$){
my $class = shift;
my $r = shift;

$c ||= $class->new(); # �� , �� new.

$c->{t}->process("template.tmpl", $c); # �� .
}

##################
# ��
##################
sub new{
bless $self, $class

$self->{dbh} = DBI->connect(.........); # ��
$self->{t} = new Template(.........); # ��
$self->{cgi} = new CGI;

$self->{site_path} = "/la/bla/bla/la";
$self->{cgi_path} ="/d/sfd/fs/";
return $self,
}

� �� template.tmpl
�� [% my_var = "12345" %]

�� ?
�.�. �� $c->{my_var} �� ?

�� UTF-8 ��

Fri, 8 Jul 2005 10:07:01 GMT

�� MySQL. �� UTF-8.
��

print $string_from_database;

�� UTF-8 �� .
� �� , �� UTF-8 �� .
� �� ,
�� .

��

Wed, 29 Jun 2005 07:06:16 GMT

��
@fld[$n] = ({
id => $id,
type => $type,
pr => \@f,
});

n++
��

return @fld

�� , �� @f, �� @fld
�� ?

������ Template Toolkit : ������ � Template Toolkit

Template::Plugin::XML::RSS

��� include-��������

template Factory

��� ���������� ������ ���������.

� �ݣ ����� ������ ������ �����������??

����������� ����� � ������� TT

�������������

Template Toolkit �� winXP

fork() � [% PERL %]

TT ������� ����.

eval() � TT2

��������� �� ������� � ������

INCLUDE

��� ������� ������������ �����? � �� �������� i=i-1

Bug ��� Feature ? �� �������� $_, $! � �.�.

�������� ������� (� �������)