The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

App::Followme::CreateNews - Create an index with the more recent files

SYNOPSIS

    use App::Followme::CreateNew;
    my $indexer = App::Followme::CreateNews->new($configuration);
    $indexer->run();

DESCRIPTION

This package creates an index for files in the current directory that contains the text of the most recently modified files together with links to the files, It can be used to create a basic weblog. The index is built using a template. The template has Loop comments that look like

    <!-- loop -->
    <!-- endloop -->

and indicate the section of the template that is repeated for each file contained in the index. The following variables may be used in the template:

body

All the text inside the content tags in an page.

title

The title of the page is derived from the file name by removing the filename extension, removing any leading digits,replacing dashes with spaces, and capitalizing the first character of each word.

url

The relative url of an html page.

time fields

The variables calculated from the modification time are: weekday, month, monthnum, day, year, hour24, hour, ampm, minute, and second.

CONFIGURATION

The following fields in the configuration file are used:

absolute

If true, urls in a page will be absolute

body_tag

The the name of the tag pair containing the body text.

base_directory

The directory containing the configuration file. This directory is searched to create the index.

exclude_files

One or more filenames or patterns to exclude from the index

news_file

Name of the news index file to be created, relative to the base directory.

news_index_length

The number of pages to include in the index.

news_template

The path to the template file, relative to the top directory.

web_extension

The extension used for web pages. Pages with this extension are considered for inclusion in the index.

LICENSE

Copyright (C) Bernie Simon.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Bernie Simon <bernie.simon@gmail.com>