2010鐃緒申鐃緒申鐃緒申07·鐃緒申鐃�19鐃緒申鐃緒申鐃緒申
TT 鐃緒申鐃緒申鐃緒申\鐃緒申鐃�\鐃緒申鐃�\¹\鐃緒申鐃緒申鐃緒申¼\鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申臓鐃�tpage 鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申\³\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申¼\鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�¹鐃緒申臓鐃緒申³鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申»鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃渋￥申\³\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申 template 鐃緒申鐃緒申鐃述￥申·鐃緒申鐃緒申鐃獣�鐃緒申³鐃緒申鐃緒申鐃緒申鐃緒申鐃縮�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申臓鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申臓鐃�
\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申¼\鐃緒申鐃緒申鐃緒申鐃緒申��鐃縦￥申·鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申²¼µ鐃緒申鐃緒申鐃渋�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃渋￥申
$ cat hoge.tt package [% module %]; use stict; use warnings; use 5.008001; our $VERSION = '0.01'; 1; __END__ =head1 NAME [% module %] - =head1 SYNOPSIS use [% module %]; =head1 DESCRIPTION [% module %] is =head1 AUTHOR [% author %] E<lt>[% email %]E<gt> =head1 SEE ALSO =head1 LICENSE This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut
tapge 鐃緒申鐃緒申鐃述�鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
$ tpage --define module=Foo --define author=xaicron --define [email protected] hoge.tt package Foo; use stict; use warnings; use 5.008001; our $VERSION = '0.01'; 1; __END__ =head1 NAME Foo - =head1 SYNOPSIS use Foo; =head1 DESCRIPTION Foo is =head1 AUTHOR xaicron E<lt>[email protected]<gt> =head1 SEE ALSO =head1 LICENSE This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut
鐃緒申鐃�³鐃緒申鐃緒申鐃術�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申臓髻��鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申臓鐃�
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
author 鐃緒申鐃緒申鐃緒申鐃緒申鐃�« email 鐃緒申鐃緒申鐃緒申鐃緒申鐃�«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�½鐃緒申鐃緒申鐃術�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申²鐃緒申��鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃渋�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申��鐃曙¡�鐃緒申
鐃緒申鐃�½鐃緒申鐃�³鐃緒申鐃緒申鐃緒申 .tpagerc 鐃緒申鐃緒申鐃緒申鐃緒申鐃�¹鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申
$ENV{HOME}/.tpagerc 鐃緒申鐃緒申鐃緒申
define author = xaicron define email = [email protected]
鐃緒申鐃緒申鐃緒申鐃緒申鐃�«½鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃渋￥申¼«鐃緒申鐃緒申�Ǚ申鐃緒申�™申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃渋�鐃緒申
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申臓鐃� eval_perl option 鐃緒申鐃緒申鐃緒申鐃緒申鐃�«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申臓�À鐃緒申鐃緒申鐃緒申鐃緒申���鐃緒申鐃緒申»鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃述�鐃緒申鐃暑Ǚ申鐃緒申�™申鐃緒申鐃�½Ð鐃緒申鐃�·鐃緒申鐃緒申鐃縦�鐃緒申鐃緒申鐃�¾鐃緒申鐃�¹鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申
$ cat timestapm.tt [% PERL %]print scalar localtime[% END %] $ tpage --eval_perl timestamp.tt Mon Jul 19 13:09:13 2010
鐃緒申鐃緒申鐃緒申鐃緒申鐃�«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�¹鐃緒申鐃縮�鐃渋¢Ë鐃緒申鐃�²鐃緒申鐃�»鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃渋�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃渋￥申
$ cat ~/.tpagerc
define author = xaicron
define email = xaicron {at} capn.org
eval_perl
鐃緒申鐃緒申鐃塾�鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�½鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申�™申��鐃緒申Ð鐃緒申臓鐃�¾鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃盾™申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申¹
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申¼\鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申��鐃緒申鐃緒申鐃�·鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申鐃緒申臓鐃�OreOre pmsetup 鐃緒申鐃緒申鐃緒申»鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申·鐃緒申臓鐃�½鐃緒申��鐃緒申»鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃渋￥申鐃緒申鐃縦�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申鐃緒申鐃�\³\鐃緒申鐃�\鐃緒申�™申·鐃緒申鐃緒申鐃緒申½鐃緒申��鐃緒申鐃緒申¹鐃緒申陝��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申鐃緒申鐃渋￥申¼鐃緒申鐃緒申鐃暑Ǚ申鐃緒申鐃緒申\鐃緒申鐃�\鐃緒申鐃�\鐃緒申鐃緒申鐃緒申¼\鐃緒申鐃�½鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申»鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申³鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃術�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申臓鐃緒申·µ鐃緒申»鐃緒申鐃緒申鐃緒申鐃緒申鐃�¼鐃緒申��鐃緒申鐃緒申鐃�\¹\鐃緒申鐃�\鐃緒申鐃�\鐃緒申\鐃緒申鐃緒申鐃緒申鐃緒申��鐃緒申鐃緒申��鐃緒申鐃緒申鐃�·鐃緒申��鐃緒申鐃緒申鐃緒申鐃緒申«鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃署´�鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�»鐃緒申鐃緒申鐃署¨�鐃緒申鐃緒申鐃緒申鐃緒申¹鐃緒申臓鐃�
