#!/usr/local/bin/perl use File::Basename; use Getopt::Long; use Sledge::Install; # default my %options = ( pages => 'Apache', ); GetOptions( \%options, 'pages=s', ); my $project = shift or do { my $me = basename($0); die <new($project, \%options)->setup; warn <<"WARN"; Initial setup for $project is now finished. Remember: 1) Edit $project/Config/_common.pm 2) Make session table. Thanks for using Sledge! - Sledge development team WARN ;