Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1935388
  • 博文数量: 347
  • 博客积分: 1241
  • 博客等级: 中尉
  • 技术积分: 4752
  • 用 户 组: 普通用户
  • 注册时间: 2011-01-27 06:48
个人简介

下死功夫,动活脑筋;读好书,交益友

文章分类

全部博文(347)

文章存档

2018年(23)

2017年(68)

2016年(46)

2015年(51)

2014年(58)

2013年(53)

2012年(42)

2011年(6)

发布时间:2014-01-23 14:06:53

最近使用xml进行通讯,使用自定义的协议,最先发送xml文件的长度,然后是xml文件。使用perl发送一个整数还是比较麻烦的,这和python一样,所以python 3才有了bytes字节类型。use IO::Socket::INET;# auto-flush on socket$| = 1;# create a connecting socketmy $socket = new IO::Socket::INET (  &nb.........【阅读全文】

阅读(5772) | 评论(1) | 转发(1)

发布时间:2014-01-03 15:26:20

最近一直在写webmin的模块,发现webmin不好调试,只好使用syslog。use Sys::Syslog;                        # all except setlogsock()use Sys::Syslog qw( :DEFAULT setlogsock);my $remotehos.........【阅读全文】

阅读(2240) | 评论(0) | 转发(0)

发布时间:2014-01-02 11:16:23

删除一个ip地址my $strTemp = "";open(FILE,"/etc/steelport/round-robin.txt");while(<FILE>){                if(/192.168.9.196/)         {        .........【阅读全文】

阅读(1561) | 评论(0) | 转发(0)

发布时间:2013-12-11 16:51:59

perl语言使用CPAN安装模块# apt-get install libdatetime-perl libdbi-perl libdbd-mysql-perl \libclass-autouse-perl libmd5-perl libdigest-sha1-perl \libhtml-template-perl libimage-size-perl libmime-lite-perl \libmime-perl libcompress-zlib-perl libnet-dns-perl \liburi-perl libhtml-tagset-perl libhtm.........【阅读全文】

阅读(2160) | 评论(0) | 转发(0)
给主人留下些什么吧!~~
留言热议
请登录后留言。

登录 注册