#!/home/mark/perl5/perlbrew/perls/perl-5.12.1/bin/perl

eval 'exec /home/mark/perl5/perlbrew/perls/perl-5.12.1/bin/perl  -S $0 ${1+"$@"}'
    if 0; # not running under some shell
use strict;
use warnings;
use OptArgs qw/dispatch/;

dispatch(qw/run App::optargs/);

__END__

=head1 NAME

optargs - print an OptArgs program command summary

=head1 VERSION

0.0.1 Development release.

=head1 SYNOPSIS

    optargs CLASS [COMMAND]

=head1 DESCRIPTION

B<optargs> is a utility for developers writing Perl scripts with
L<OptArgs>. It prints out the synopsis for every sub-command in a
program.  The following arguments and options are accepted:

=over

=item CLASS

OptArgs-based module to map. Required.

=item COMMAND

Name of the command. If not specified then CLASS will be used as the
command name.

=item --indent, -i Int

Number of spaces to indent sub-commands. Defaults to 4.

=item --spacer, -s Str

Character to use for indent spaces. Defaults to a single space
character ' '.

=item --full, -f

Print out the entire usage message instead of just the synopsis.

=back

Note that B<optargs> does a C<use lib 'lib'> to allow your
in-development class to be loaded in preference to installed versions.

=head1 SEE ALSO

L<OptArgs>

=head1 AUTHOR

Mark Lawrence <nomad@null.net>

=head1 LICENSE

Copyright 2012 Mark Lawrence <nomad@null.net>

This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 3 of the License, or (at your
option) any later version.

