Hello, "<% $r->connection->user %>" (<% $r->auth_name %>)
% } % for my $t (@$myvar) {<% $t %>
% }This test compoent accessed <%$counter%> times so far
<%$r->server->server_hostname%>:<%$r->server->port%> <%init> my $myvar = ["hello world", "welcome to the test mason component"]; # No, this is not a good example of how to implement a counter. my $counter = $m->cache->get("counter"); if (!$counter) { $m->cache->set("counter", $counter = 1, "1h"); } else { $m->cache->set("counter", ++$counter, "1h"); } %# -- end test component-- you should not see this line output