按类别查询搜索结果
关于关键词 的检测结果,共 70
damofeixue64 | 2020-01-20 17:40:38 | 阅读(940) | 评论(0)
点击(此处)折叠或打开#!/usr/bin/perl# tcp_iosocket_dt_srv.pluse strict;use IO::Socket;use POSIX qw(WNOHANG);$SIG{CHLD} = sub {     while((my $pid = waitpid...【阅读全文】
damofeixue64 | 2020-01-20 17:40:36 | 阅读(910) | 评论(0)
点击(此处)折叠或打开#!/usr/bin/perl# tcp_iosocket_dt_srv.pluse strict;use IO::Socket;use POSIX qw(WNOHANG);$SIG{CHLD} = sub {     while((my $pid = waitpid...【阅读全文】
ychuang6666 | 2019-06-30 11:51:42 | 阅读(2010) | 评论(0)
perl语言如何使用Coro实现多线程Telnet【阅读全文】
liudashang | 2018-12-28 09:10:56 | 阅读(33380) | 评论(0)
perl语言如何使用Coro实现多线程Telnet【阅读全文】
Jack_Tan123 | 2017-07-20 15:10:14 | 阅读(1260) | 评论(0)
根据http://blog.chinaunix.net/uid-20648182-id-1907476.htmlperl中的目录操作函数有:1。mkdir 函数     调用语法:mkdir (dirname, permisions)     dirname:将要创建的目录名,可以为字符串或表达式。     permisions:八进制数,指定目录的访问权...【阅读全文】
j_cle | 2017-03-24 19:30:00 | 阅读(1100) | 评论(0)
点击(此处)折叠或打开#!/usr/bin/perluse strict;use warnings;use Data::Dumper;use File::Basename;use File::Spec::Functions;my $data = data_for...【阅读全文】
j_cle | 2017-03-23 00:19:15 | 阅读(1080) | 评论(0)
Perl实现对源目的主机发包量的统计【阅读全文】
perltest | 2016-10-30 18:13:51 | 阅读(990) | 评论(0)
在我们医院的医保实施过程中,需要实现这样的功能:医保结算电脑需要在命令行(不是浏览器)通过CGI和服务器通信,上传sql语句,把查询到的结果通过cgi传回来。【阅读全文】
flynetcn | 2015-12-23 14:46:58 | 阅读(940) | 评论(0)
linux下diff多个目录的脚本【阅读全文】
snowtty | 2015-10-22 16:58:02 | 阅读(1680) | 评论(0)
perl发信模块MailSender这个模块基本实现了日常运维中常用的发信功能,比如多人邮件,抄送,密送,smtp认证,发送带附件的邮件,html格式的邮件等。首先,使用MailMsg方法发信 代码如下: #!/usr/bin/perl # # file  wo.pl # use strict; use warnings;use MailSender...【阅读全文】
幸福非天赐 | 2015-04-24 15:10:52 | 阅读(2110) | 评论(0)
在“perl-Gtk2编程-第一步 安装软件” 中可以看到,perl-Gtk2是有相应的图形化组件帮助手册的,因此可以使用man Gtk2::组件名称 进行查询,如下命令: man -a  Gtk2::Window |tee a.txtGtk2::Window(3)                 ...【阅读全文】
丹京 | 2015-04-16 20:50:58 | 阅读(1010) | 评论(0)
一、IO::Socket简介IO::Socket, 它是socket通信的面向对象的Perl接口。IO::Socket下又有两个子类IO::Socket::INET与IO::Socket::UNIX.现在用的是IO::Socket::INET。它的步骤是:先调用new方法,然后就可以进行基本I/O操作(使用print与getline等基本I/O方法)了,最后调用close方法结束会话,那么整个SOCKET会话就算完...【阅读全文】
sxou27 | 2015-03-27 14:18:58 | 阅读(2650) | 评论(0)
内容出自:http://my.oschina.net/tkorays/blog/305257perl登录各种网站的原理与实现tkorays(tkorays@hotmail.com)小孩子才践行大道理,大人只会讲。        写脚本抓取某个页面内容很简单,但是往往事情没那么简单。有些页面必须是要登录才能查看的,比如你想抓取...【阅读全文】
zhiyue5654 | 2015-03-13 11:52:14 | 阅读(620) | 评论(0)
:意思表示作为民事法律行为的要素,只是行为人欲设立、变更、终止民事权利和民事义务的内在意思的外在表现。行为人实施行为的内在意思是其行为的目的,该目的只有表示出来才能为他人了解。才有法律意义。因此,意思表示包括意思与表示两方面的要件或内容。意思表示中的意思,是行为人实施行为的内在意思,是行为人要设立、...【阅读全文】
赵东来 | 2015-03-04 14:33:54 | 阅读(310) | 评论(0)
 近年来,如皋市积极为科技企业破解融资难题,2014年争取省科技风险补偿资金贷款总额居南通第一。  2014年,如皋市积极组织“苏科贷”项目申报,充分利用如皋市率先在全省建立的2亿元科技成果转化风险补偿贷款专项资金,为如皋市20家科技型企业争取到省科技风险补偿资金贷款4900万元。  为改变中小企业融资难状况,...【阅读全文】
zhiyue5654 | 2015-01-18 14:47:47 | 阅读(600) | 评论(0)
二人共用一辆汽车,②外部关系。而增设的中央审判机关,当犯人不服判决临刑称冤或家属代为申冤时。 可以授权法务人员签订其负责范围内的标准文本合同;无标准文本合同和50万元以上的合同由法务人员预审,经法律事务主管审核电子版同意,完成交货;当在其他地点交货时,卖方完成交货。三、婚姻、继承、家庭、物业服务、人身...【阅读全文】
Jack_Tan123 | 2014-12-19 22:59:09 | 阅读(0) | 评论(0)
################################包模块的初始化####################################package Me;       ###定义包的名称    脚本中用use Me加载包;use warnings;    ###加载use strict; require 5.6;    ####限定perl的版本  低于5.6则运行不了require &n...【阅读全文】
zhiyue5654 | 2014-12-15 20:36:45 | 阅读(640) | 评论(0)
并已经交付或者办理过户登记,实际违约包括拒绝履行、迟延履行、不完全履行三类。将举证期限延长至 年 月日。职务:董事长 申请事项:申请延长举证期限,由主债务人与保证人之间的法律关系所产生的主债务人的抗辩权不受影响。虽未明显拖延继续其程序。 纪某偷开汽车并出卖的行为是盗窃,周某尾随该妇女至偏僻处,杂法是关...【阅读全文】
Jack_Tan123 | 2014-12-08 20:18:19 | 阅读(1120) | 评论(0)
use Win32::NetAdmin;my $hostname = Win32::NodeName();my $ref = {};my $hostid;if( Win32::NetAdmin::GetTransports("\\\\$hostname", $ref) ) {    foreach my $trans (keys %{$ref})...【阅读全文】
frozenlaza | 2014-11-18 18:08:40 | 阅读(0) | 评论(0)
适用于一个目录下有多个文件,想删掉其中的大部分,只保留一小部分先把这一小部分文件名保存到一个文本in.txt,然后读入该文本,递归指定目录找到每个文件名,与in.txt所记载的文件名匹配,决定是否删除该文件。点击(此处)折叠或打开#!/usr/bin/perl#RegDelFile.pl...【阅读全文】