view release on metacpan or  search on metacpan

lib/App/Plog.pm  view on Meta::CPAN

=item * missing configuration files

=item * errors in configuration files

=back

=cut

my (@arguments) = @_ ;
local @ARGV = @arguments ;

# parse command line
my $blog_id ;
my $configuration_path ;
my $temporary_directory ;

croak 'Invalid option!' unless GetOptions 
			(
			'h|help' => \&display_help,
			'blog_id=s'   => \$blog_id,