/ 
MooseX-Getopt-Usage-0.12_02
River stage two • 9 direct dependents • 13 total dependents
/ MooseX::Getopt::Usage::Pod::Text

NAME

MooseX::Getopt::Usage::Pod::Text - pod2text duties for MooseX::Getopt::Usage.

SYNOPSIS

use MooseX::Getopt::Usage::Pod::Text;
my $parser = MooseX::Getopt::Usage::Pod::Text->new();
my $out;
$parser->output_string(\$out);
$parser->parse_string_document($pod);
say $out;

DESCRIPTION

A subclass of Pod::Text to tweak the output to make a nice usage message. Does the following.

Lower cases headings (keeping first letter cap).
Adds a colon on the end of headings.
Changes SYNOPSIS head1 to USAGE.
Optionally strips out headings.

METHODS

new

Override constructor to add our own headings and opt_indent options.

heading

Lower casing and colon. Strip headings.

cmd_head1

Change SYNOPSIS to USAGE.

SEE ALSO

MooseX::Getopt::Usage, MooseX::Getopt::Usage::Formatter, perl.

BUGS

All complex software has bugs lurking in it, and this module is no exception. See "BUGS" in MooseX::Getopt::Usage for details of how to report bugs.

ACKNOWLEDGEMENTS

Thanks to Pod::Usage for the lower casing headings regexp. Based on Russ Allbery's Pod::Text:Color prototype code.

AUTHOR

Mark Pitchless, <markpitchless at gmail.com>

COPYRIGHT

Copyright 2012 Mark Pitchless

LICENSE

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.