% my $path;
% for my $part (split '/', $module) {
%= '::' if $path
% $path .= "/$part";
%= link_to $part => url_for("/perldoc$path")
% }
(<%= link_to 'source' => url_for("/perldoc$path.txt") %>)
% for my $part (@$parts) {
-
%= link_to splice(@$part, 0, 2)
% if (@$part) {
% while (@$part) {
- <%= link_to splice(@$part, 0, 2) %>
% }
% }
% }
%= content_for 'perldoc'