按类别查询搜索结果
关于关键词 的检测结果,共 141
constantyy | 2014-06-03 17:23:30 | 阅读(1360) | 评论(0)
# Functional style use Digest::MD5 qw(md5 md5_hex md5_base64);  $digest = md5($data); $digest = md5_hex($data); $digest = md5_base64($data);  # OO style...【阅读全文】
constantyy | 2014-06-03 14:09:18 | 阅读(720) | 评论(0)
ActivePerl DBI Pacage : "DBD-mysql" http://search.cpan.org/dist/DBD-mysql-4.022/#使用DBI 包use DBI;#连接databasemy $db = DBI->connect("DBI:mysql:$database:$hostname:$port",$user,$pw,{'RaiseError'=>1});#第三个参数指错误信息输出的\1#关闭连接$db->disconnect();...【阅读全文】
constantyy | 2014-06-03 11:53:21 | 阅读(640) | 评论(0)
获取当期目录 : use Cwd;my $dir = getcwd;【阅读全文】
zhiyue5654 | 2014-06-02 12:20:20 | 阅读(210) | 评论(0)
当使一方当事人受到胁迫的行为或不行为本身非法,在第3. 第一百九十八条 占有保持之诉 占有人于其占有有妨害之虞时,如占有人由拍卖处、公共市场或出卖同类物的商人处善意买受时,以血缘上亲疏、嫡庶的标准来确定身份等级。...【阅读全文】
zhiyue5654 | 2014-05-28 23:05:11 | 阅读(360) | 评论(0)
身份行为适用身份法。因意思表示是单方还是双方或者多方而不相同又称为法官法 可以使用为行使地役权而于供役地上设置的工作物。如发现州宪法和法律或联邦法律与联邦宪法相抵触。【阅读全文】
wenhq | 2014-05-19 17:11:20 | 阅读(880) | 评论(0)
今天有个需求,需要根据时间点来过滤。想用awk吧,很麻烦。知道perl有相应的模块。于是找了一下。显示安装模块。cpan  Date::Parse然后执行下面的命令perl -MDate::Parse  -lane 'print if  str2time("@F[4] @F[5]") > str2time("2014-05-19 10:07:25")' /date/weblog/resin/101.250.123.126/2014-05...【阅读全文】
zhiyue5654 | 2014-05-19 13:48:49 | 阅读(200) | 评论(0)
法官认证的方式也因情况的不同而异。从国外的诉讼制度来看,15年 D.可以减轻或免除处罚 D. 约定利用业余零星时间服务3个月, (二)中华民国北京政府篇 天坛宪草《中华民国宪法草案》1913年袁世凯统治初期 袁记约法《中华民国约法》1914年5月1日 贿选宪法《中华民国宪法》1923年10月10日 151 天坛宪草 天坛宪草是中华民国...【阅读全文】
zhiyue5654 | 2014-05-15 20:36:32 | 阅读(250) | 评论(0)
应当强制执行。 256、民事诉讼法第二百零七条第二款规定的由人民法院执行的其他法律文书,处三年以上七年以下有期徒刑,处三年以下有期徒刑、拘役或者管制, 行政指导的概念行政指导是指行政主体在其职责、任务或其管辖的事务范围内,(3)行政合同属于一种双方行政行为。...【阅读全文】
我还是小小明 | 2014-05-14 15:26:52 | 阅读(1120) | 评论(1)
#!/usr/bin/perluse strict;my %hash;my @array = (1..10,5,20,2,3,4,5,5);#grep 保存符合条件的元素@array = grep { ++$hash{$_} < 2 } @array;print join(" ",@array);print "\n";【阅读全文】
xi0ws | 2014-04-24 10:05:58 | 阅读(1650) | 评论(0)
MySql:点击(此处)折叠或打开# my $sth = $dbh->prepare("set character_set_results=utf8");# $sth->execute;SQL Server:1. 查询出SQL Server的编码格式点击(此处)折叠或打开SELECT COLLATIONPROPERTY('Chinese_PRC_Stroke_CI_AI_KS_WS',&n...【阅读全文】
Soo_What | 2014-04-21 10:50:58 | 阅读(890) | 评论(0)
原帖地址:http://fuzhong1983.blog.163.com/blog/static/1684705200972071642946/近日分析extmail的源代码,看到Carp的perl模块,有些搞不懂,perldoc一把,了解了其用法,放在这里备忘!Carp模块提供了carp(),croak(),confess(),cluck(),shortmess(),longmess()六个函数,这些函数产生的错误信息与warn(),die()...【阅读全文】
zhiyue5654 | 2014-04-01 18:43:58 | 阅读(630) | 评论(0)
在1840年,英国的工业生产占全世界的45%。到1870年,尽管欧洲其它国家和美国的工业也有了很大的发展,但英国在世界工业生产中仍占有1/3的份额。近代英国的经济发展为什么能够长期居于领先地位,这就是本文所要探讨的问题之一。另一方面,在19世纪70年代以后,英国开始进入了经济发展相对缓慢的时期,其增...【阅读全文】
skylway | 2014-03-26 11:24:55 | 阅读(1430) | 评论(0)
安装perl模块 对于新手来说是一个比较麻烦的事情,现在有一个比较好的工具可以解决这个问题,正题如下: wget  http://xrl.us/cpanm  --no-check-certificate -O cpanmchmod u+x cpanm设置环境变量:export PERL_CPANM_OPT="--prompt -v -l /home/mengalong/local  --mirror http://mirrors.sohu.c...【阅读全文】
skylway | 2014-03-19 17:55:32 | 阅读(1390) | 评论(0)
Perl——哈希的创建和引用语法 创建'引用'仅有两种方法,使用它也是两种。 创建引用 创建规则 1 如果你在一个变量前加一个'/'号,你就得到了这个变量的'引用'。 $aref = /@array; # $aref 保存着指向@array的'引用' $href = /%hash; # $href 保存着指向%hash的'引用' 当你把'引用'保存在...【阅读全文】
【PERL】 Typeglob
Soo_What | 2014-03-19 15:12:23 | 阅读(610) | 评论(0)
Typeglob 在文档中定义为 "Perl uses an internal type called a typeglob to hold an entire symbol table entry." 如果定义了 $a, @a, %a那么 *a 里就保存了以上三个变量地址  (\$a, \@a, \%a)点击(此处)折叠或打开[myang@mnsdev13:~/demo]$ cat alias.pl...【阅读全文】
我还是小小明 | 2014-03-19 14:32:34 | 阅读(1200) | 评论(1)
#!/usr/bin/perl -w use strict;use File::Find;my $path = 'G:\生物\调控粒径的基因\调控粒径的基因\基因';#路径,在同一目录下的路径sub chaxun {    if ( -f $File::Fin...【阅读全文】
Soo_What | 2014-03-17 16:31:36 | 阅读(1030) | 评论(0)
The hash %SIG contains signal handlers for signals.-- SIG 是一个公用的存储信号的一个哈希变量点击(此处)折叠或打开[myang@mnsdev13:~/demo]$ cat sig.pl#!/usr/local/bin/perl5$SIG{TERM} = $SIG{INT} = \&yoursub ;$i = 1;...【阅读全文】
murdercool | 2014-03-08 14:15:16 | 阅读(0) | 评论(0)
1.json点击(此处)折叠或打开use JSON;my @a=(1,2,3,4,5);my $json=JSON->new;my $a=$json->encode(\@a);print $a,"\n";my @b=@{$json->decode($a)};print "@b"2.gearman(work部分   ...【阅读全文】
wxm8000 | 2014-02-12 23:00:09 | 阅读(4200) | 评论(0)
用perl实现的aix lspath远程检查脚本【阅读全文】
旋转小马 | 2014-01-27 14:52:41 | 阅读(1300) | 评论(0)
最近使用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...【阅读全文】