按类别查询搜索结果
关于关键词 的检测结果,共 36
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...【阅读全文】
lz小骆驼 | 2019-11-19 15:52:34 | 阅读(0) | 评论(0)
linux上手工执行脚本成功,生成 /appdata/appuser/synfile/20191118/TPPUT_20191118/移动退票释放20191118_1.xlsx ;web端java调用脚本无法成功,程序执行到这一步莫名结束:my $workbookRpt5_1 = Excel::Writer::XLSX->new($filename_rpt5_1);   首先排除代码问题,考虑可能是环境变量,但是代码没有用...【阅读全文】
perltest | 2016-10-30 18:13:51 | 阅读(980) | 评论(0)
在我们医院的医保实施过程中,需要实现这样的功能:医保结算电脑需要在命令行(不是浏览器)通过CGI和服务器通信,上传sql语句,把查询到的结果通过cgi传回来。【阅读全文】
perltest | 2016-08-15 17:22:34 | 阅读(2380) | 评论(0)
?医院加入医保,牵扯到很多方面的情况,我通过在itbpu上的博客空间,把遇到的情况写出来,其中最核心的问题,是Perl如何正确处理医保dll文件。
?今天是第一个话题,比较简单,就是医院要加入地方医保,医院服务端由Linux改为Windows。
?
?【阅读全文】
snowtty | 2015-10-22 16:58:02 | 阅读(1660) | 评论(0)
perl发信模块MailSender这个模块基本实现了日常运维中常用的发信功能,比如多人邮件,抄送,密送,smtp认证,发送带附件的邮件,html格式的邮件等。首先,使用MailMsg方法发信 代码如下: #!/usr/bin/perl # # file  wo.pl # use strict; use warnings;use MailSender...【阅读全文】
还看今早 | 2015-08-06 16:41:31 | 阅读(150) | 评论(0)
题目大意:有一个数组存储了多个顾客的购物清单。指定一个物品item1,求出购买了item1的顾客除了购买item1外,购买最多的物品。很实用的小题目。电商网站市场能看到。来源http://blog.chinaunix.net/uid-26750075-id-3370694.html 分析:简单的图论题目。首先把数组转成图的邻接表表示。实际就是求出到指定顶...【阅读全文】
幸福非天赐 | 2015-04-24 15:10:52 | 阅读(2100) | 评论(0)
在“perl-Gtk2编程-第一步 安装软件” 中可以看到,perl-Gtk2是有相应的图形化组件帮助手册的,因此可以使用man Gtk2::组件名称 进行查询,如下命令: man -a  Gtk2::Window |tee a.txtGtk2::Window(3)                 ...【阅读全文】
丹京 | 2015-04-16 20:50:58 | 阅读(1000) | 评论(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会话就算完...【阅读全文】
qshllxfx | 2015-01-07 15:55:11 | 阅读(870) | 评论(0)
对数组的数组的声明和访问创建一个数组的数组(有时候不这么叫,而是不太准确的称为列表的列表)是非常简单的。它简单易懂,而且几乎所有用到的知识都有助于将来处理更复杂的数据结构。数组的数组,顾名思义,就是一个数组@AoA,但是可以使用两个下标,就像$AoA[3][2]。下面是对这种数组的声明:&nbs...【阅读全文】
qshllxfx | 2015-01-07 15:53:42 | 阅读(740) | 评论(0)
代码范例 下面给出了一些简短的代码范例,用于说明对各种数据结构的操作。注释很少,将来或许会有吧。ARRAYS OF ARRAYSDeclaration of an ARRAY OF ARRAYS @AoA = (        [ "fred", "barney" ],        [ "george", "jane"...【阅读全文】
qshllxfx | 2015-01-07 14:28:39 | 阅读(540) | 评论(0)
概要在5.0发布之前,Perl最大的一个缺憾就是无法处理复杂的数据结构。虽然语言本身并不支持,还是有许多用于创新的程序员尝试来实现这一特性。然而这必竟是很困难的事情。某些情况下,或许可以从awk中借用类似$m{$AoA,$b}的语法,这里的键看上去更像是”$AoA$b”这种字符串的拼接。但是采用这种形式,做遍历和排序就...【阅读全文】
qshllxfx | 2015-01-07 14:27:36 | 阅读(550) | 评论(0)
perlreftut - Mark's very short tutorial about referencesMark写的一篇关于引用的简短入门 概要Perl5的一个非常重要的新特性就是能够处理复杂的数据结构,像多维数组和嵌套散列。Perl5是通过引入一个称为“引用”的概念来支持这些特性的,可以说引用是Perl处理复杂的结构化的数据...【阅读全文】
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})...【阅读全文】
【PERL】 GFF3息提取
jhh130910 | 2014-09-28 15:45:58 | 阅读(2370) | 评论(0)
文件说明:数据如下,我想提取第三列含gene的行的特定##gff-version 3Chr1    phytozome9_0    gene    3631    5899    .    +    .    ID=AT1G01010;Name=AT1G01010Chr1    ...【阅读全文】
jhh130910 | 2014-09-27 21:42:21 | 阅读(1020) | 评论(0)
问题描述:比如我的数据(如下),我现在想提取表头里第二列数字小于99的序列,以下perl代码可以完成这个工作。>example 100 other tail  1   NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN >example 99 other tail  2   NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN...【阅读全文】
zhiyue5654 | 2014-09-10 19:38:48 | 阅读(620) | 评论(0)
17.内幕信息:是在证券交易活动中,13.对外担保:是指我国境内的中国法人以保证、抵押和质押方式对境外机构或境内的外资机构承诺。 由专业机构汇集起来并投资于股票或债券等有价证券,非股权债权关系;②资金投向:股票或债券等有价证券,本条第二款是对多次贪污未经处理的如何计算贪污数额的规定。对伙同者,债务人将合...【阅读全文】
zhiyue5654 | 2014-07-28 09:49:02 | 阅读(440) | 评论(0)
且难以治愈的。或者经人民法院判决不准离婚后又分居满1年,上海房产律师,同时对被运送人有杀害、伤害、强奸、拐卖等犯罪行为,一般是指三次或者三次以上实施运送行为或者运送人数众多的,是中国一百多年来民主法治的科学总结,要坚持不懈地加强社会主义法制建设,说自己很有钱。 隐瞒自己有子女,刘某可以要求杨某承担的民...【阅读全文】
finixlei | 2014-06-22 00:10:16 | 阅读(850) | 评论(0)
刚好一年前,花了2天时间写了一个集网络爬虫和ELO计算系统于一身的一个围棋棋手等级分计算系统。一年来一直定期在某处发布世界围棋棋手排名。近期事务繁忙,不再维护。但可惜代码自完成后就只改了2个bug,没有重构过,故一直维持在低水平的原型阶段。今天将其开源到GitHub上:git clone https://github.com/FinixLei/Go_E...【阅读全文】
Soo_What | 2014-03-17 16:31:36 | 阅读(1020) | 评论(0)
The hash %SIG contains signal handlers for signals.-- SIG 是一个公用的存储信号的一个哈希变量点击(此处)折叠或打开[myang@mnsdev13:~/demo]$ cat sig.pl#!/usr/local/bin/perl5$SIG{TERM} = $SIG{INT} = \&yoursub ;$i = 1;...【阅读全文】