```{index} single: Pod::Perldoc::GetOptsOO ``` # Pod::Perldoc::GetOptsOO Customized option parser for Pod::Perldoc ## SYNOPSIS ```perl use Pod::Perldoc::GetOptsOO (); Pod::Perldoc::GetOptsOO::getopts( $obj, \@args, $truth ) or die "wrong usage"; ``` ## DESCRIPTION Implements a customized option parser used for [Pod::Perldoc](../Perldoc.md). 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. ## SEE ALSO [Pod::Perldoc](../Perldoc.md) ## COPYRIGHT AND DISCLAIMERS Copyright (c) 2002-2007 Sean M. Burke. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. This program is distributed in the hope that it will be useful, but without any warranty; without even the implied warranty of merchantability or fitness for a particular purpose. ## AUTHOR Current maintainer: Mark Allen `` Past contributions from: brian d foy `` Adriano R. Ferreira ``, Sean M. Burke ``