内容

名称

Pod::Simple::PullParserToken -- Pod::Simple::PullParser 中的标记

概要

给定一个 $parser，它是 Pod::Simple::PullParser（或其子类）的类对象...

while(my $token = $parser->get_token) {
  $DEBUG and print STDERR "Token: ", $token->dump, "\n";
  if($token->is_start) {
    ...access $token->tagname, $token->attr, etc...

  } elsif($token->is_text) {
    ...access $token->text, $token->text_r, etc...

  } elsif($token->is_end) {
    ...access $token->tagname...

  }
}

(另请参见 Pod::Simple::PullParser)

描述

当您对 Pod::Simple::PullParser 执行 $parser->get_token 时，您应该获得一个 Pod::Simple::PullParserToken 子类的对象。

子类将添加方法，并且也将继承这些方法

$token->type

这将返回标记的类型。这将是字符串 "start"、字符串 "text" 或字符串 "end" 之一。

一旦您知道对象的类型，您就知道它属于哪个子类，因此它支持哪些方法。

是的，您可能可以使用类似 $token->isa('Pod::Simple::PullParserEndToken') 的代码来做同样的事情，但这不像使用 $token->type 那样漂亮，甚至不像使用以下快捷方式那样漂亮

$token->is_start

这是 $token->type() eq "start" 的简写。

$token->is_text

这是 $token->type() eq "text" 的简写。

$token->is_end

这是 $token->type() eq "end" 的简写。

$token->dump

这将返回此对象的字符串化值。这对于调试很有用，例如：

while(my $token = $parser->get_token) {
  $DEBUG and print STDERR "Token: ", $token->dump, "\n";
  ...
}

另请参阅

我的子类：Pod::Simple::PullParserStartToken、Pod::Simple::PullParserTextToken 和 Pod::Simple::PullParserEndToken。

Pod::Simple::PullParser 和 Pod::Simple

支持

有关 POD 和 Pod::Simple 的问题或讨论，请发送到 [email protected] 邮件列表。发送空邮件到 [email protected] 订阅。

此模块在开放的 GitHub 存储库中管理，https://github.com/perl-pod/pod-simple/。请随意分叉和贡献，或克隆 git://github.com/perl-pod/pod-simple.git 并发送补丁！

欢迎针对 Pod::Simple 的补丁。请将错误报告发送到 <[email protected]>。

版权和免责声明

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

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

此程序按“原样”提供，不提供任何形式的明示或暗示的保证，包括但不限于适销性和特定用途适用性的暗示保证。

作者

Pod::Simple 由 Sean M. Burke <[email protected]> 创建。但不要打扰他，他已经退休了。

Pod::Simple 由以下人员维护：