Pod::Perldoc::GetOptsOO(3p) Perl Programmers Reference Guide

Pod::Perldoc::GetOptsOO(3p) Perl Programmers Reference Guide # Pod::Perldoc::GetOptsOO(3p) Perl Programmers Reference Guide NNAAMMEE # Pod::Perldoc::GetOptsOO - Customized option parser for Pod::Perldoc SSYYNNOOPPSSIISS # use Pod::Perldoc::GetOptsOO (); Pod::Perldoc::GetOptsOO::getopts( $obj, \@args, $truth ) or die "wrong usage"; DDEESSCCRRIIPPTTIIOONN # Implements a customized option parser used for Pod::Perldoc. Rather like Getopt::Std's getopts: Call Pod::Perldoc::GetOptsOO::getopts($object, \@ARGV, $truth) Given -n, if there's a opt_n_with, it'll call $object->opt_n_with( ARGUMENT ) (e.g., "-n foo" => $object->opt_n_with('foo'). Ditto "-nfoo") Otherwise (given -n) if there's an opt_n, we'll call it $object->opt_n($truth) (Truth defaults to 1) Otherwise we try calling $object->handle_unknown_option('n') (and we increment the error count by the return value of it) If there's no handle_unknown_option, then we just warn, and then increment the error counter The return value of Pod::Perldoc::GetOptsOO::getopts is true if no errors, otherwise it's false. ...