Ist das normal, daß der erste _ gefressen wird?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
use strict;
use warnings;
use HTML::Template::Compiled;
my $htc = HTML::Template::Compiled->new(
tagstyle => [qw(+asp -comment -php -tt)],
scalarref => \<<'EOT');
<%= foo%>
<%= _foo%>
<%= __foo%>
<%= ___foo%>
<%= ____foo%>
EOT
$htc->param(
foo => 'bar',
_foo => '_bar',
__foo => '__bar',
___foo => '___bar',
____foo => '____bar',
);
print $htc->output();
__END__
bar
bar
_bar
__bar
___bar
Und noch eine Frage:
Komme ich von der LOOP aus an die Parameter, die parallel zur Loop stehen irgendwie wieder ran?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
use strict;
use warnings;
use HTML::Template::Compiled;
my $htc = HTML::Template::Compiled->new(
tagstyle => [qw(+asp -comment -php -tt)],
scalarref => \<<'EOT');
<%= var%>
<%LOOP loop%>
<%= var%>
value? <%= __HTC__.param.var%>
<%/LOOP%>
EOT
$htc->param(
var => 'value',
loop => [{var => 'loop_value'}],
);
print $htc->output();
__END__
value
loop_value
value?
$SIG{USER} = sub {love 'Perl' or die};