lovejianglan的专栏

[color=red]#这个比默认utf8字更多，否则个别中文字会有乱码[/color][code="java"]my $maps=new Unicode::Map("CP936"); my $workbook = Spreadsheet::WriteExcel->new("/home/perl/report/test.xls"); my $format = $workbook->add_f...

原文：http://www.91linux.com/html/article/program/perl/20100204/18873.html 名称 perlipc － Perl的进程间通讯（信号、fifos、管道、安全子进程、套接字与信号量） -------------------------------------------------------------...

系统重装后，我执行perl程序，前面提示一个告警： [code="java"]perl: warning: Setting locale failed. perl: warning: Please check that your locale settings:[/code] 于是安装语言包： [code="java"][oracle@newweb2 perl]$ yum instal...

#!/usr/bin/perl use strict; use DBI; use Encode; print "Start ungz .....\n"; my $user = "newweb"; my $password = "newweb"; #datasource:dbi:Oracle:host=\"192.168.102.48\";sid=\"ora10g\" #...

color][size=large]【localtime】[/size] my ($mday,$mon,$wday) = (localtime(time() - 86400 ))[3,4,6]; localtime基本格式： ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = ...