 |
 |
| <%= spacer(8,20) %> |
<%= apply_templates('document("/sidebar_new.xml")') %>
|
<%= spacer(8,20) %> |
 |
|
<%= spacer(10,1) %> |
|
http://axkit.org/
::
<%
{
my $uri = $r->uri;
$uri =~ s/^\///;
my ($file) = $uri =~ /([^\/]+)$/;
$uri =~ s/\Q$file\E$//;
my $local = '';
foreach my $part (split('/', $uri)) {
$local .= "/$part/index.xml";
my $title = findvalue("document('$local')//title[1]/text()");
if ($title eq 'Index') {
print $part, " :: ";
}
else {
print "", , " :: ";
}
$local =~ s/\/index\.xml$//;
}
if ($file ne 'index.xml') {
my $location = "/$file";
$location = "/$uri$file" if $uri;
print "", findvalue("document('$location')//title[1]/text()"), " :: ";
}
}
%>
|
| <%= spacer(20,1) %> |
|
<%= apply_templates('/webpage/body/*') %>
|
<%
if ($r->uri eq '/index.xml') {
%>
<%= apply_templates('document("news.xml")') %>
|
<% } %>
|
| <%= spacer(20,1) %> |
|
These pages are copyright © 2000 AxKit.com Ltd
|
|
<%= spacer(10,1) %> |
![AxKit.org [logo curtesy of http://xml.com]](/img/banner2.gif)
";
}
%>