内容

名称

Pod::Simple::PullParserTextToken -- Pod::Simple::PullParser 中的文本标记

概要

(参见 Pod::Simple::PullParser)

描述

当您对 Pod::Simple::PullParser 执行 $parser->get_token 时，您可能会得到此类的对象。

这是 Pod::Simple::PullParserToken 的子类，它继承了其所有方法，并添加了以下方法

$token->text

这将返回此标记所包含的文本。例如，解析 C<foo> 将返回一个 C 开始标记、一个文本标记和一个 C 结束标记。如果您想从文本标记中获取“foo”，请调用 $token->text

$token->text(somestring)

这将更改此令牌所持有的字符串。您可能不需要这样做。

$token->text_r()

这将返回此令牌所持有的字符串的标量引用。如果您不想内存复制潜在的大文本值（与段落或逐字块一样大），这将很有用，因为调用 $token->text 会这样做。

或者，如果您想更改值，您甚至可以执行以下操作

for ( ${  $token->text_r  } ) {  # Aliases it with $_ !!

  s/ The / the /g; # just for example

  if( 'A' eq chr(65) ) {  # (if in an ASCII world)
    tr/\xA0/ /;
    tr/\xAD//d;
  }

  ...or however you want to alter the value...
  (Note that starting with Perl v5.8, you can use, e.g.,

      my $nbsp = chr utf8::unicode_to_native(0xA0);
      s/$nbsp/ /g;

  to handle the above regardless if it's an ASCII world or not)
}

您不太可能需要为自己构造此类的对象，但如果您想这样做，请调用 Pod::Simple::PullParserTextToken->new( text )

另请参阅

Pod::Simple::PullParserToken、Pod::Simple、Pod::Simple::Subclassing

支持

有关 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 由以下人员维护