multithreading - 多线程 perl 模型的示例代码

Question

有一个关于 Perl 线程的教程 here:
然而，关于多线程程序模型的信息很少:Boss/Workers、Work Crew、Pipeline。
我不知道如何实现这些模型。

你会这么好心给我一些关于这些的示例工作代码吗？

更新:
感谢 Ojosilva 提供了一些链接，我在问这个问题之前用谷歌搜索了其中两个。
第一个例子是旧的，不好。剩下两个就好了。但是一些涉及文件输入/输出和变量共享访问的更多“真实世界”示例将会很棒。

例如，我是一位热爱 Perl 的为上帝工作的计算机专家。他有世界各国的地址簿，以制表符分隔的文本文件，其中许多将是几个 GB。他希望我解析这些文本文件的任意组合(例如 addressbook_usa.txt、addressbook_russia.txt、addressbook_india.txt)以进行一些统计(例如关于年龄、性别、世界分布)。他希望我向他展示 Perl 的魔力，它不仅可以完成这项工作，而且可以快速完成，因为他不想浪费他拥有大量 RAM 和磁盘空间的强大多核工作站。

仅供引用，我还查看了 cpan 上的 Thread::Pool 和 Thread::Pool::Simple 模块。前者很有前途，但我未能在我的工作站上安装。后者几乎不简单，没有示例代码。再说一次，我的观点是 找到一些东西来了解如何实现多线程 Perl，而不是直接跳到顶部。

Answer 1

这是 Work Crew example

可以找到一个 Boss/Worker 示例 here

还有一个 pipeline one

不是最好的例子，但可能会让你开始。