Select Code to Download

% my $date = localtime();

Today's date is <% $date %>

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

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

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

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

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