一个perl多进程的简单程序框架
来源:互联网 发布:app数据收集 编辑:程序博客网 时间:2024/05/05 16:16
一个perl多进程的简单程序框架
#!c:/perl/bin/perl.exe -w
my $maxchild=10;
for($i=0;$i<=$maxchild-1;$i++)
{
my $child=fork();
if($child)
{ # child >; 0, so we're the parent
warn "launching child $child/n";
}else{
do_child($i); # child handles
exit 0; # child is done
}
}
exit;
sub do_child
{
my $child_number=shift(@_);
print("child ,$child_number /n");
}
my $maxchild=10;
for($i=0;$i<=$maxchild-1;$i++)
{
my $child=fork();
if($child)
{ # child >; 0, so we're the parent
warn "launching child $child/n";
}else{
do_child($i); # child handles
exit 0; # child is done
}
}
exit;
sub do_child
{
my $child_number=shift(@_);
print("child ,$child_number /n");
}
运行程序
D:/MySoft/perl>fork_test1.pl
launching child -1964
child ,0
launching child -3184
child ,1
launching child -1740
child ,2
launching child -2872
launching child -2692
child ,3
launching child -2680
child ,4
launching child -2684
child ,5
launching child -1660
child ,6
launching child -2940
child ,7
launching child -600
child ,8
child ,9
D:/MySoft/perl>
launching child -1964
child ,0
launching child -3184
child ,1
launching child -1740
child ,2
launching child -2872
launching child -2692
child ,3
launching child -2680
child ,4
launching child -2684
child ,5
launching child -1660
child ,6
launching child -2940
child ,7
launching child -600
child ,8
child ,9
D:/MySoft/perl>
- 一个perl多进程的简单程序框架
- 一个简单的perl程序
- 开发运行一个简单的perl程序
- 一个简单的auth perl程序
- 一个简单的gw perl程序
- perl一个简单mysql操作的小程序
- SpringMvc一个简单的框架入门程序
- 一个简单的java程序-----框架
- 一个简单的SpringMVC框架web程序
- Perl多进程与多线程简单示例
- 一个简单的多的socket http 下载原型 perl
- 一个简单的好玩程序(可以创建进程)
- 简单程序Perl C++的效率比较
- 用PERL实现一个简单的NIDS
- 一个简单的Perl多线程脚本
- 关于PERL的一个小程序
- C51中232/485一个简单的程序框架
- scrapy框架学习-实现一个简单的爬虫程序
- jfreechart 多坐标轴组合图
- 转载——分析:微软故意让Vista不受欢迎?
- PetShop 分析、封装、软件设计模式
- 案例:一个系统功能实现方式引发的隐形需求
- 反射Array
- 一个perl多进程的简单程序框架
- 实时系统之一
- 如何发布 带ACCESS数据库的WINFORM项目???
- perl的输出缓冲
- 在百岁鱼的顿悟
- 局域网聊天软件源代码(包括语音聊天)
- 打发时光的102个网站
- IAR用法点滴
- 剖析Android應用程式的四大區塊