2009/08/18 - Apache AxKit has been retired.

If you're looking for a way to just display POD on a web page, here's a 
provider I wrote which does it.... It just uses Pod::XML to fetch a .pm
file 
as XML, at that point you can do whatever you want, such as use the 
pod2axpoint.xsl.to make AxPoint, or just convert it to HTML, which takes 
about 10 mins of XSLT programming. 

There are some problems with the Pod::XML format though. The way it 
structures links is inconsistent, and in fact pretty much useless at that. 
Anyway, have fun with this... 


On Friday 25 October 2002 08:57 am, Andreas J. Koenig wrote:
> >>>>> On Fri, 25 Oct 2002 14:00:00 +0200, Robin Berjon
> >>>>> <robin.berjon [at] expway.fr> said:
>   >
>   > IIRC it's not a bug in AxPoint, just a missing feature :) However, if
>   > Pod::SAX produces that then it has a bug because it doesn't follow
the
>   > AxPoint spec.
>
> Thanks, Robin, for the tricky answer:-)
>
> Pod::SAX doesn't produce AxPoint, it produces stuff like
>
> <pod>
>   ...
>   <itemizedlist>
>     <listitem>
>	<para>
>
>
> which can be converted further by pod2axpoint.xsl (which comes with
> Pod::SAX). This, in turn, produces something like
>
> <slideshow>
>   ...
>   <slide>
>     ...
>     <point>
>	<point>
>
> So, if I understand correctly, the bug is in pod2axpoint.xsl. I'll try
> to work around that. Unfortunately, my XSLT skills are not up to fixing.

package GEB::PodProvider;
use strict;
use vars qw/@ISA/;
@ISA = ('Apache::AxKit::Provider::File');

use Apache;
use Apache::Log;
use Apache::AxKit::Exception;
use Apache::AxKit::Provider;
use Apache::AxKit::Provider::File;
use Apache::Constants;
use Pod::XML;

# We are just going to provide POD to people as XML, otherwise we handle
things just like a File Provider does...

sub get_strref {
    my $self = shift;
	if ($self->_is_dir()) {
	throw Apache::AxKit::Exception::IO(
	  -text => "$self->{file} is a directory - please overload File
provider and use AxContentProvider option");
    }
    my $fh = $self->SUPER::get_fh();
	my $parser = Pod::XML->new('send_to_string' => 1);
    $parser->parse_from_filehandle($fh);
	my $contents = $parser->{'xml_string'};
    return \$contents;
}

1;
=head1 NAME

PodProvider - An AxKit Provider for POD.

=head1 SYNOPSIS

In your .htaccess file etc.

  AxContentProvider GEB::PodProvider

=head1 DESCRIPTION

This is an AxKit provider which allows you to feed POD files into AxKit as
XML. It uses the
Pod::XML module to generate the XML, see that module for a description of
the structure of the
generated XML.

=head1 Author

Tod G. Harter, Copyright 2002, all rights reserved
tharter [at] giantelectronicbrain.com
http://www.giantelectronicbrain.com

=head1 License

This code is the proprietary and confidential property of its author and
may only be used with
explicit permission. If you do not have a license agreement with the author
then do not use it.