按类别查询搜索结果
关于关键词 的检测结果,共 169
rcijxlee | 2013-03-21 14:15:17 | 阅读(60) | 评论(0)
男は大砲が大好きだからね。だけど…」「だけど?」「だけど、金が!事業は好調に動き出したけど、未だにソコまで揃えるカネがないんだよ。工場は動いてて注文もあるけど、工員の熟練度がまだ低いからチョンボした仕損費が馬鹿にならないし精度が低くても作動するカラシニコフだからまだ大丈夫だけど、精度モノの部品だった...【阅读全文】
kk861123 | 2013-03-15 23:32:03 | 阅读(0) | 评论(0)
递归算法在实际生活中大量被使用,很多问题可以很巧妙的被解决掉。例1: 楼梯有n个台阶,上楼可以一步上1阶,也可以一步上2阶,一共有多少种上楼的方法?斐波那契数列  第一项为1 第二项为2 也就是f(n)=f(n-1)+f(n-2),用递归求。#!/usr/bin/perl -wuse strict;print...【阅读全文】
BuTa丶潇 | 2013-03-13 15:41:52 | 阅读(1270) | 评论(0)
在unix/Linux中有一个强大的命令用来搜索文件中的模式,相信大家都比较熟悉,那就是grep,同样在perl中,grep也被用来进行搜索某个模式。下面我们来看一下grep的一个例子:#! /usr/bin/perluse strict;use warnings;my @array = qw(greyhound bloodhound hello hand);my @hound = grep /hound/,@array;print ...【阅读全文】
zhengsenlin888 | 2013-03-13 11:18:59 | 阅读(1950) | 评论(0)
#!/usr/bin/perl#author: zhengsenlin#date: 2013-03-13#desc: time piece use 5.016;use strict;use warnings;use autodie;use Time::Piece;my $t = localtime(1360780381);my $real_time =  $t->ymd . " " . $t->hms;say $real_time;【阅读全文】
damofeixue64 | 2013-03-09 11:58:41 | 阅读(570) | 评论(0)
use POSIX;foreach my $id(sort keys %serv){my $pid=fork();        if($pid==0)        {                alarm(10);     &nbs...【阅读全文】
ewayfly | 2013-02-28 22:17:05 | 阅读(1910) | 评论(0)
在使用 Gearman 做分布式处理时,各机需要注册一个独立的 job 作为信息反馈,为求方便,Gearman::Worker 脚本 register_function 代码又要通用,于是想到了使用各自的 ip 地址作为 job 命名。那么怎么在 worker 脚本里获取本机 ip 作为 func 呢?第一种办法,最简单的,调用 shell: $ip = `ifconfig eth0|grep -...【阅读全文】
wsxedcer | 2012-12-14 16:12:40 | 阅读(1227) | 评论(0)
采用 SMTP_auth 模块发送从mysql中取出的访问量。

#!/bin/env perl
use DBI;
use POSIX;
use Net::SMTP_auth;
use MIME::Base64;
use strict;【阅读全文】
centrify | 2012-08-12 12:18:30 | 阅读(33653) | 评论(0)
q(string in q); 相当于'string in q'qq(string in qq);相当于“string in qq"()可换为,{},[]等匹配对字符qq{string in qq};字符串中也可以出现qq[string [in] qq];也可以换为任意//,;;,等相同字符对 qq/string in qq/Administrator@2012-0521-2127 ~/wesoft/perl$ cat qq.pl...【阅读全文】
xjc2694 | 2012-07-25 10:25:50 | 阅读(4319) | 评论(0)
perl,cgi,性能,【阅读全文】