2 Star 0 Fork 0

mirrors_gitpan/IO-NestedCapture

加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
该仓库未声明开源许可证文件(LICENSE),使用请关注具体项目描述及其代码上游依赖。
克隆/下载
贡献代码
同步代码
取消
提示: 由于 Git 不支持空文件夾,创建文件夹后会生成空的 .keep 文件
Loading...
README
IO::NestedCapture
=================

IO::NestedCapture allows for some nice and simple STDIN, STDOUT, STDERR
capturing that can be nested. If you just need to capture output without the
nesting, you might want to see IO::Capture.

What do I mean by nested capture? Here's an example:

  use IO::NestedCapture ':subroutines';
  my $io = IO::String->new;

  IO::NestedCapture->set_next_out($io);

  capture_out \&foo;

  while (<$io>) { print ucfirst($_) }

  sub foo {
    capture_out \&bar;

    my $out = IO::NestedCapture->get_last_out;
    while (<$out>) { print lc($_) }
  }

  sub bar {
    print "HELLO WORLD!\n";
  }

  # output is:
  # Hello world!

Basically, the output of the first method is captured and converted to lowercase
and then the other capture captures it and converts the first character to
uppercase.

Installation
------------

Typical Module::Build install:

  perl Build.PL
  ./Build
  ./Build test
  ./Build install

Bugs and Such
-------------

Feature requests and bugs can be submitted to CPAN RT:

  http://rt.cpan.org/

Cheers,
Sterling

空文件

简介

取消

发行版

暂无发行版

贡献者

全部

近期动态

加载更多
不能加载更多了
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
1
https://gitee.com/mirrors_gitpan/IO-NestedCapture.git
git@gitee.com:mirrors_gitpan/IO-NestedCapture.git
mirrors_gitpan
IO-NestedCapture
IO-NestedCapture
master

搜索帮助