NAME Apache::TinyCP - put up content really quickly SYNOPSIS In your Apache configuration: PerlModule Apache::TinyCP SetHandler perl-script PerlHandler Apache::TinyCP DirectoryIndex HomePage PerlSetVar ContentDir /home/www/content PerlSetVar TemplateDir /home/www/templates PerlSetVar CacheDir /home/www/var/contentcache PerlSetVar ModTimeFormat %d.%b.%y In your "ContentDir" directory, a file named HomePage, along with other content files: Hello, world! *This* is the HomePage! Here's a link to AnotherPage. See [=Text::KwikiFormatish] for more info on the default formatter In your "TemplateDir" directory, a file named layout: My Site - [% title %]

[% title %]


[% content %]

Last modified: [% modtime %]

DESCRIPTION This module is a very simple handler that takes files from ContentDir, formats them somehow, and stamps on a header and footer using the template file template in TemplateDir. The default formatter is Text::KwikiFormatish and the end result is somewhat of a pseudo-wiki web site. It was created because I enjoyed the ease and functionality of Kwiki text for creating content, but wanted something like a single-user wiki. To set this up, create the three directories and set them as "TemplateDir", "ContentDir" and "CacheDir" in the Apache configuration, like in "SYNOPSIS". By default the content files located in ContentDir are formatted with Text::KwikiFormatish and cached with Cache::File, which uses the path specified at CacheDir to store cache files. The default templating system is Template::Toolkit. The handler uses the layout template wrapper in "TemplateDir". The tags "[% content %]", "[% title %]" and "[% modified %]" are replaced by the formatted content, the filename, and the formatted modification date (respectively). You could probably do this by writing a formatting handler and filtering that through Apache::Template, though I'm not sure how the caching would work. You might also want to check out Apache::Sandwich. If any of these ways works for you, more power to ya. My goal was to have all my content files in one place (not htdocs) as well as use wiki text for the rapid creation of content for my site. EXTENDING Changing the Formatter Say you wanted to write your pages in POD instead of Kwikish text. You would create a custom package, override the "format_content()" method and use that as your PerlHandler. In your Apache configuration: use Pod::Simple::HTML (); package Local::TinyCMS; use base qw( Apache::TinyCMS ); sub format_content { my ( $self, $data, $r ) = @_; my $output; my $parser = Pod::Simple::HTML->new; $parser->output_string( \$output ); $parser->parse_string_document( $data ); return $output; } ... PerlHandler Local::TinyCMS ... Futher Customization Here are all of the methods you can override. All methods are passed $self, the name of the package, as the first argument and sometimes $r, the Apache request object. * get_filename( $self, $r ) Returns the absolute path to the content file. * get_content( $self, $filename, $r ) Returns the formatted content to be inserted into the "[% content %]" template variable. By default, this formats with Text::KwikiFormatish and caches the formatted content using Cache::File. * format_content( $self, $data, $r ) Return the formatted version of $data, the contents of the content file. This method is only used by "get_content". If you override "get_content", you will not need to override this method. * print_content( $self, $content, $r ) Print the given $content to STDOUT. By default this method wraps the content in a template, and provides two extra variables: "[% title %]", the name of the document without a leading slash, and "[% modtime %]", the modification time of the document. The modification time format is configurable -- see "SYNOPSIS". * get_content_type( $self ) Return the content type returned. Default is "text/html". This method is only used by "print_content". If you override "print_content", you will not need to override this method. AUTHOR Ian Langworth - langworth.com SEE ALSO Cache::File, Template, Text::KwikiFormatish I'm currently using this at LICENSE This is free software. You may use it and redistribute it under the same terms as Perl itself.