难道你不知道执行php这样的代码的方法吗?
<html>
<?perl
print( 'test' );
?>
</html>
答案 0 :(得分:15)
使用HTML::Mason:
<%perl>
use Date::Calc;
my @today = Date::Calc->Today();
my $str = "$today[0]-$today[1]-$today[2]";
</%perl>
<html>
<body>
Today is <%$str %>
</body></html>
Apache配置:
PerlModule HTML::Mason::ApacheHandler
<Location /usr/local/apache/htdocs/mason>
SetHandler perl-script
PerlHandler HTML::Mason::ApacheHandler
</Location>
答案 1 :(得分:7)
语法略有不同,但这是HTML::Mason使用的方法。
就个人而言,我更喜欢模板系统,鼓励更多的代码和表示分离。 Template Toolkit这样做可以灵活地执行您想做的任何事情。
答案 2 :(得分:2)
虽然它没有被广泛使用,但也有EmbPerl。
答案 3 :(得分:2)
虽然您可以将Perl直接嵌入Template Toolkit文件中:
[% PERL %]
use Date::Calc;
my @today = Date::Calc->Today();
my $str = "$today[0]-$today[1]-$today[2]";
[% END %]
<html>
<body>
Today is [% $str %]
</body></html>
更好的方法是使用Plugin:
[% USE date %]
<html>
<body>
Today is [% date.format(date.now, format = '%d-%b-%Y') %]
</body></html>