按类别查询搜索结果
关于关键词 的检测结果,共 60
wangjj20 | 2013-09-25 17:13:45 | 阅读(4280) | 评论(0)
    今天使用perl处理excel文件,里面有包含中文字符,需要导入到数据库。 导入到是正常,不过打印出中文列报错“Wide character in print ……”   网上搜索了下,可以使用如下方法:   输入输出utf8化----------------------- use utf8;binmode(STDIN, ':encoding(u...【阅读全文】
murdercool | 2013-09-25 16:36:20 | 阅读(0) | 评论(0)
use utf8;  use Encode;  use URI::Escape;    $/ = "/n";    #从unicode得到utf8编码  $str = '%u6536';  $str =~ s//%u([0-9a-fA-F]{4})/pack("U...【阅读全文】
yrwyys001 | 2013-09-22 10:39:15 | 阅读(270) | 评论(0)
如果说上一个世纪是中华民族过的最精彩的时代,那个世纪的中国经历了战争和狂暴,经历了伟大的新中国的成立,经历了文革的人为浩劫,经历的举世瞩目的改革开放联动创新dupoo.net,经历 了连续n多年的GDP快速增长,那无疑可以肯定的是,上世纪后三十年中国的发展充满了奇迹和中国速度。自2000年的中国包括世界范围内跨...【阅读全文】
zhiyue5654 | 2013-08-16 19:08:16 | 阅读(570) | 评论(0)
第四节 联营联营是企业之间或企业和事业单位之间的联合经营他是法人参加横向经济联合的主要形式在联营中联营各方地位平等主要是以合同或章程的方式确定双方的权利义务并以此协调经营活动1法人型联营最紧密最稳定的联营形式联营各方以财产技术劳务等出资组成新的经济实体并由其独立承担民事责任的联营2合伙型联营半紧密较稳...【阅读全文】
zhiyue5654 | 2013-08-11 10:04:29 | 阅读(240) | 评论(0)
刑法中的因果关系具有哪些基本特征?                 轧空                 是普遍认为当天股价将下跌,于是都抢空头帽子,然而股价并末大幅度下跌,无法低价买进...【阅读全文】
icucstone | 2013-07-09 14:48:15 | 阅读(3220) | 评论(0)
我的第一个perl脚本:简单socket通信【阅读全文】
xiaoyuansky | 2013-05-10 16:41:53 | 阅读(490) | 评论(0)
1.循环语句2.条件语句3.顺序执行语句表达式的真假值;表达式不一定是逻辑表达式,但一定要得出真假值;逻辑表达式,经过逻辑运算或者比较运算得出的;数学表达式的值为0;字符串表达式,字符串为空;列表为空undef变量未定义以上这些都为假;#######################################################条件语句i...【阅读全文】
andersonyan | 2013-04-26 18:04:29 | 阅读(2300) | 评论(0)
perl中our的用法require 5.006当版本号小于 5.006 的时候,会返回失败,从而导致模块加载失败。所以它的作用就是保证模块调用环境的 Perl 版本。our 和 my 一样,都是对变量的声明,不过 our 声明的是包全局变量,而 my 声明的是词法变量。不过,经过 our 声明的变量,它会变得像一个词法变量一样,其实这也...【阅读全文】
BuTa丶潇 | 2013-04-25 18:07:36 | 阅读(940) | 评论(0)
创建线程线程作为 Perl 中的一种实体,其一生可以粗略的分为创建,运行与退出这三个阶段。创建使得线程从无到有,运行则是线程完成其主要工作的阶段,退出自然就是指线程的消亡。线程的运行和普通函数的执行非常类似,有其入口参数,一段特定的代码流程以及执行完毕后返回的一个或一组结果,唯一与普通函数调用的不同...【阅读全文】
ronghy013 | 2013-04-24 16:20:41 | 阅读(750) | 评论(0)
 我们在linux常常用到一个程序需要加入参数,现在了解一下 perl 中的有关控制参数的模块 Getopt::Long ,比直接使用 @ARGV 的数组强大多了.我想大家知道在 Linux 中有的参数有二种形式.长参数  –help短参数   -h也就是-和–的分别.–表示完整参数.-表示简化参数.在 Perl 的这个模...【阅读全文】
CUTianrui007 | 2013-04-21 13:42:38 | 阅读(2770) | 评论(0)
Perl VC Memory Process【阅读全文】
liuxiaoyin666 | 2013-04-15 17:34:57 | 阅读(1600) | 评论(0)
BuTa丶潇 | 2013-03-25 10:54:02 | 阅读(1150) | 评论(0)
Perl正则表达式中模式匹配选项选项描述g匹配所有可能的Perl正则表达式中模式i忽略大小写m将串视为多行o只赋值一次s将串视为单行x忽略Perl正则表达式中模式中的空白1、匹配所有可能的Perl正则表达式中模式(g选项)@matches="balata"=~/.a/g;#now@matches=("ba","la","ta")匹配的循环:while("balata"=~...【阅读全文】
andersonyan | 2013-03-22 22:16:24 | 阅读(2930) | 评论(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会话就算完...【阅读全文】
BuTa丶潇 | 2013-03-22 16:18:02 | 阅读(1350) | 评论(0)
localtime#   秒     分      时      天      月         年      星期    年天   #   0      1        2     ...【阅读全文】
BuTa丶潇 | 2013-03-11 11:35:19 | 阅读(1330) | 评论(0)
飞碟运算符就是对比$a和$b,返回-1、0、1$a$b返回1如:点击(此处)折叠或打开my @array = qw/18 23 62 11 14 6 100/; print join(' ', sort { $a $b } @array), "\n";#这个得到的是6 11 14 18 23 62 100print join(' ', sort { $b ...【阅读全文】
zhengsenlin888 | 2013-03-02 19:22:49 | 阅读(1960) | 评论(0)
直接贴出代码:点击(此处)折叠或打开my @numbers = qw(1 100 50 6 70 555 66 70 80 99 1 20 3);my @odd_digit_sum = grep {    my $sum;    $sum += $_ for split //;...【阅读全文】
zhengsenlin888 | 2013-01-30 22:28:11 | 阅读(1180) | 评论(0)
(一)单行注释: 以#开头的行都被perl认为是注释。但是有一个例外,perl程序的第一行是#开头的,他指定了perl程序的解释器。例如:#print 1; (二)多行注释:最常用的方法是使用 POD(Plain Old Documentations) 来进行多行注释。方法如下:=podcodes to co...【阅读全文】
kk861123 | 2012-08-04 20:34:19 | 阅读(2653) | 评论(1)
No.7~11 摘自《Effective.Perl.Programming-Writing.Better.Programs.with.Perl》【阅读全文】
ahfyth | 2011-07-25 15:02:37 | 阅读(3046) | 评论(0)
有的时候往数组里面push变量的时候你想知道数组中是否已经有同样值的变量,有的话就不push了在hash里面直接用exists就行了,而且时间是O(1)的,但是数组就不行了有很多种方法,包括遍历和grep但是在perl 5里面有很简单的写法,就是 ~~ 操作符例子my @t = ("a", "b", "c");...【阅读全文】