% my $date = localtime();

##</code><code>##

Today's date is <% $date %>

##</code><code>##

% my $ua = $r->header_in('User-Agent');
% if ($ua =~ /msie/i) {
     Welcome, Internet Explorer users
% } elsif ($ua =~ /mozilla/i) {
     Welcome, Netscape users
% }

##</code><code>##

% foreach $item (@list) {
  <li><% $item %>
% }

##</code><code>##

<& header &>
<& nav-bar &>
Here is the content of this page.
<& footer &>

##</code><code>##

<& header, date=>$date, section=>'News' &>

##</code><code>##

<%args>
$date
$section=>'Updates'
</%args>