#!/usr/bin/perl

=head1 NAME

siteGenerator - HPR Site Generator

=head1 SYNOPSIS

	siteGenerator [OPTION]... PAGE...

	-v, --verbose  use verbose mode
	--help         print this help message

	Where I<PAGE> is a file name of a web page.

	Examples:

		Generate two specific pages:
		siteGenerator index about

		Generate the whole site:
		siteGenerator ALL

=head1 DESCRIPTION

This is a site generator based upon the Perl Templates Toolkit.

=head1 AUTHOR

Roan Horning <roan.horning@no-spam.gmail.com>

=cut

use strict;
use warnings;

use Getopt::Long qw(:config auto_help);
use Pod::Usage;
use Config::Std;

exit main();

sub main {

    # Argument parsing
    my $verbose;
    GetOptions(
        'verbose'  => \$verbose,
    ) or pod2usage(1);
    pod2usage(1) unless @ARGV;
    my (@pages) = @ARGV;

	# Load config file
	read_config "site.cfg" => my %config;

	use Data::Dumper 'Dumper';
	warn Dumper [ \%config ];

	return 0;
}