内容

名称

Pod::Perldoc::GetOptsOO - Pod::Perldoc 的定制选项解析器

语法

use Pod::Perldoc::GetOptsOO ();

Pod::Perldoc::GetOptsOO::getopts( $obj, \@args, $truth )
   or die "wrong usage";

描述

实现了一个定制选项解析器，用于 Pod::Perldoc。

与 Getopt::Std 的 getopts 类似

调用 Pod::Perldoc::GetOptsOO::getopts($object, \@ARGV, $truth)
给定 -n，如果存在 opt_n_with，它将调用 $object->opt_n_with( ARGUMENT )（例如，"-n foo" => $object->opt_n_with('foo')。Ditto "-nfoo"）
否则（给定 -n），如果存在 opt_n，我们将调用它 $object->opt_n($truth)（Truth 默认为 1）
否则，我们尝试调用 $object->handle_unknown_option('n')（并且我们根据其返回值增加错误计数）
如果没有 handle_unknown_option，那么我们只是发出警告，然后增加错误计数器

如果无错误，则 Pod::Perldoc::GetOptsOO::getopts 的返回值为 true，否则为 false。

另请参阅

Pod::Perldoc

版权和免责声明

版权所有 (c) 2002-2007 Sean M. Burke。

此库是免费软件；您可以在与 Perl 相同的条款下重新分发和/或修改它。

分发此程序的目的是希望它有用，但不提供任何保证；甚至没有对适销性或针对特定目的的适用性的默示保证。

作者

当前维护者：Mark Allen <[email protected]>

过去的贡献者：brian d foy <[email protected]> Adriano R. Ferreira <[email protected]>, Sean M. Burke <[email protected]>