#!/usr/bin/perl -w use strict; use CGI::Application::PhotoGallery; use Config::General; # Get Configuration my $conf = new Config::General( -ConfigFile => '/home/robl/bin/picpost/etc/config.cfg', -InterPolateVars => 1 ); my $config = {$conf->getall}; my $webapp = CGI::Application::PhotoGallery->new( PARAMS => { photos_dir => $config->{paths}->{html}, title => $config->{info}->{title}, index_template => $config->{paths}->{etc}.$config->{files}->{photo_index}, single_template => $config->{paths}->{etc}.$config->{files}->{photo_single}, graphics_lib => 'Magick', } ); $webapp->run();