Perl
小申
GOGOGO~
展开
-
apache中http脚本获取oracle等环境变量
在linux、sunOS、HPUX系统上使用apache和perl的cgi做分布的soap调用接口,cgi调用的脚本需要连接数据库。 部分系统中会有出现连接数据库死掉的情况,原因为在http调用中oracel相关数据库参数传递不过来。 解决办法如下: 在~/apache/c原创 2011-09-05 10:49:14 · 1112 阅读 · 0 评论 -
Perl中对Excel的读取处理
#读取excel中存放的用户进行相关信息匹配use Spreadsheet::ParseExcel; use Encode; my $oExcel = new Spreadsheet::ParseExcel; my $oBook = $oExcel->Parse("$f原创 2011-08-30 09:15:30 · 2250 阅读 · 1 评论 -
Linux下进程追踪
(~原创辛苦~各位如要转载请注明出处~asd1986_n:http://write.blog.csdn.net/postedit/6762503~) ~最近发现很多网站转载发表了此文,特此说明~ 无法确定在Linux系统服务器上的某些进程是否已然死了还是仍然再运行?原创 2011-09-09 09:59:10 · 3656 阅读 · 2 评论 -
基于apache的soap接口分布调用
使用Perl中的soap接口完成分布调用,需要apache正常配置启动: use SOAP::Lite; use SOAP::Lite +trace=>'all';#打开追踪排查日志 my $s = SOAP::Lite ->uri("NetWork")#定义调用方法原创 2011-08-30 12:52:39 · 533 阅读 · 0 评论 -
Perl中ftp的应用
连接ftp有两种连接模式,默认模式和passive模式。 ftp服务器工作在默认模式下,连接比较简单: use Net::FTP; #initial ftp my $ftp = Net::FTP->new($ftpserver,Debug => 0, Tim原创 2011-08-30 09:30:56 · 1489 阅读 · 0 评论 -
Perl的魅力~
哈哈,前几天体会了一下perl语言的魅力所在啊: #把Test目录下所有的文件里面内容为5070的替换为9999,仅一行就完成了巨大的工作,速度还不错 perl -p -i -e 's/5070/9999/g' ./Test/* #获取10分钟前的时间,shell貌似是真原创 2011-08-30 10:16:44 · 427 阅读 · 0 评论 -
Perl中SendMail发送邮件问题
之前使用了perl中SendMail模块实现了邮件发送功能,不过遇到了邮件正文乱码,附件正常的情况。 不知道大家是否也都遇到过该问题,还是我的客户端配置有问题,后来重写了模块中sendmail方法,得到解决。 修改也很简单,只不过把maildata的编码由iso-8859-1原创 2011-08-30 12:40:55 · 1634 阅读 · 0 评论 -
工作总结--ip地址在perl中的各类应用
1.1.1.1 255.255.255.252 => 1.1.1.1/30: my ($ip,$mask)= @_; $mask = sprintf("%b%b%b%b",(split /\./, $mask)); my $temp = $mask =~ s/1/1/g; $t原创 2011-10-09 11:07:35 · 1238 阅读 · 0 评论 -
【PERL】使用wmi获取windows硬件信息
获取windows信息wmi很好用,哈哈,代码获取硬盘型号: 运行结果:原创 2012-05-03 09:50:36 · 905 阅读 · 1 评论