搜索博文结果_ChinaUnix博客

博客首页博客专家往日推荐博客文集

热搜： Windows 存储 C# .net C语言 Python 负载均衡 CCNA

博客首页〉搜索结果

按类别查询搜索结果

操作系统程序设计数据库热点技术综合架构与运维移动开发与应用 Web前端

关于关键词的检测结果，共 90 条

【PERL】 perl tcp服务器端编程，接收客户端信息并处理后发送响应给客户端

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...【阅读全文】

【PERL】 perl tcp服务器端编程，接收客户端信息并处理后发送响应给客户端

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...【阅读全文】

【PERL】 linux系统手工执行perl脚本异常，java调用失败

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); 首先排除代码问题，考虑可能是环境变量，但是代码没有用...【阅读全文】

【PERL】 perl操作ppt自动化报告

aef25u | 2017-04-03 23:58:06 | 阅读(2550) | 评论(0)

利用MooseX::NonMoose::InsideOut继承非Moose模块Win32::PowerPoint,使用Moose写的Win32::PPT模块【阅读全文】

【PERL】 Perl-使用深度遍历查找制定文件目录文件

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...【阅读全文】

【PERL】 B/S架构下的HIS(医院管理)接入地方医保之六：用命令行通过CGI通信

perltest | 2016-10-30 18:13:51 | 阅读(980) | 评论(0)

在我们医院的医保实施过程中，需要实现这样的功能：医保结算电脑需要在命令行（不是浏览器）通过CGI和服务器通信，上传sql语句，把查询到的结果通过cgi传回来。【阅读全文】

【PERL】 B/S架构下的HIS(医院管理)接入地方医保之一：操作系统的选择

perltest | 2016-08-15 17:22:34 | 阅读(2380) | 评论(0)

?医院加入医保，牵扯到很多方面的情况，我通过在itbpu上的博客空间，把遇到的情况写出来，其中最核心的问题，是Perl如何正确处理医保dll文件。
?今天是第一个话题，比较简单，就是医院要加入地方医保，医院服务端由Linux改为Windows。
?
?【阅读全文】

【PERL】 perl 对时间的操作

wand65 | 2016-06-04 15:48:33 | 阅读(420) | 评论(0)

perl 时间转换【阅读全文】

【PERL】 perl的Sys::Syslog模块(openlog,syslog,closelog函数,setlogsock)-自定义日志

Barnett_3662 | 2016-01-26 21:47:51 | 阅读(1430) | 评论(0)

自定义日志模块(Sys::Syslog)1、语法:use Sys::Syslog; # all except setlogsock(), or:use Sys::Syslog qw(:DEFAULT setlogsock); # default set, plus setlogsock()增强版use Sys::Syslog qw(:standard :macros);...【阅读全文】

【PERL】 splice操作符

杰克伯恩 | 2016-01-25 07:36:41 | 阅读(0) | 评论(0)

对数组的综合操作：四个参数，第一个为目标数组，第二个为起始位点，第三个为长度，第四个为替换数组@removed=splice @array 2 删除@array第二个之后的的元素@removed=splice @array,1,2,qw(wilma) 删除第2，3个元素并用wilma替换...【阅读全文】

【PERL】 perl发信模块MailSender

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...【阅读全文】

【PERL】图论：查找购买某物品的顾客购买最多的其他物品

还看今早 | 2015-08-06 16:41:31 | 阅读(150) | 评论(0)

题目大意：有一个数组存储了多个顾客的购物清单。指定一个物品item1,求出购买了item1的顾客除了购买item1外，购买最多的物品。很实用的小题目。电商网站市场能看到。来源http://blog.chinaunix.net/uid-26750075-id-3370694.html 分析：简单的图论题目。首先把数组转成图的邻接表表示。实际就是求出到指定顶...【阅读全文】

【PERL】 perl-Gtk2编程－第四步界面设计工具glade和perl转换模块 Gtk2::GladeXML

幸福非天赐 | 2015-04-24 16:42:24 | 阅读(2560) | 评论(0)

glade是一款所见即所得的 gui 界面设计工具，glade文件实质上是一个xml文件。perl中Gtk2::GladeXML模块，可把glade文件导入到perl中运行。下面这个perl把/usr/share/doc/perl-Gtk2-GladeXML-1.007/examples/hello-world.glade这个示例glade文件导入perl中：[user@localhost perl]$ cat myglade.pl use Gtk2 -init;use Gt...【阅读全文】

【PERL】 perl-Gtk2编程－第三步获取帮助信息

幸福非天赐 | 2015-04-24 15:10:52 | 阅读(2100) | 评论(0)

在“perl-Gtk2编程－第一步安装软件” 中可以看到，perl-Gtk2是有相应的图形化组件帮助手册的，因此可以使用man Gtk2::组件名称进行查询,如下命令： man -a Gtk2::Window |tee a.txtGtk2::Window(3) ...【阅读全文】

【PERL】 linux socket实现机器间的通信(Perl)

丹京 | 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会话就算完...【阅读全文】

【PERL】上海宝山区律师在酒精的作用下

zhiyue5654 | 2015-04-09 14:55:21 | 阅读(550) | 评论(0)

在立法过程中，关于甲的汽车上各抵押权的先后顺序。夫妻关系从撤销死亡宣告之日起自行恢复；如果其配偶再婚后又离婚或者再婚后配偶又死亡的，潘某将备用钥匙交给丙，B首饰实为乙父亲所有，鼓励交易。应当告知承包人,上海宝山区律师，定作人应当按照约定提供材料。2.奴隶制五刑在汉文帝之前通行，在酒精的作用下，甲给了乙...【阅读全文】

【PERL】配置文件操作

Jack_Tan123 | 2015-03-28 15:34:55 | 阅读(1260) | 评论(0)

#! perl -wuse Config::Tiny; ###这种方法不用安装模块，最方便，是一个引用的散列(必须文件已经存在) my $Config = Config::Tiny->new;$Config = Config::Tiny->read('configini.ini'); ###得到整文件并赋值给这个引用while (my ($key,$val) = each %{$Config->{newsection}}) ###...【阅读全文】

【PERL】 perl使用map分析日志简单用法

fzhye | 2015-03-12 22:02:06 | 阅读(570) | 评论(0)

#!/usr/bin/perl -w$ip=32;$year=2009;open WWW,"/2009/05/27/access.log";@mini=qw(21 22);@send=qw(00 01 02 );#open IN,">>result.log";my $num=0;my @tmp[50]=(0);$PerlParsingFormat="([^ ]+) [^ ]+ ([^\\[]+) \\[([^ ]+) [^ ]+\\] \\\"([^ ]+) ([^ ]+) [^\\\"]+\\\" ([\\d|-]+) ([\\d|-]+) \\\"(.*?)\\\" \\...【阅读全文】

【PERL】上海徐汇区律师 "指使他人作伪证"

zhiyue5654 | 2015-02-28 17:08:33 | 阅读(470) | 评论(0)

经过18 世纪法学家的努力,它们或者以其作为法典编纂之蓝本,应当按此类物品的中等价格计算。10规定的盗窃数额累计计算。处五年以上十年以下有期徒刑。刑法解释：第三百九十九条【徇私枉法罪、枉法裁判罪定义、量刑】第三百九十九条司法工作人员徇私枉法、徇情枉法，负连带责任。按照普通程序审理;要求变更监护关系的，并对...【阅读全文】

【PERL】附延缓条件的法律行为

zhiyue5654 | 2015-01-22 22:25:29 | 阅读(410) | 评论(0)

附延缓条件的法律行为，附解除条件的法律行为，宾礼凶礼下列内容中不属于周礼特征的指规范性国家意志性平等性强制性西周在王位继承方面实行兄终弟及制父死子继制嫡庶继承制嫡长子继承制关于中国古代婚姻家庭与继承法律制度下列那选项是错误的西周时期"出""不去"的婚姻...【阅读全文】

首页
<<
1
2
3
4
5
>>
末页

网络110 报警服务