-
perl中特殊符号
所属栏目:[大数据] 日期:2020-12-16 热度:157
http://blog.csdn.net/aldenphy/article/details/6741887 $- 当前页可打印的行数,属于Perl格式系统的一部分? $! 根据上下文内容返回错误号或者错误串? $” 列表分隔符? $# 打印数字时默认的数字输出格式? $$ Perl解释器的进程ID? $% 当前输出通道的当前页号?[详细]
-
perl子程序学习笔记
所属栏目:[大数据] 日期:2020-12-16 热度:62
http://blog.csdn.net/aldenphy/article/details/4761585 一.定义 ??????? 子程序即执行一个特殊任务的一段分离的代码,它可以使减少重复代码且使程序易读. ??????? PERL中,子程序可以出现在程序的任何地方. ??????? 定义方法为: ??????? sub subroutine ????[详细]
-
perl多线程
所属栏目:[大数据] 日期:2020-12-16 热度:152
http://blog.csdn.net/aldenphy/article/details/6135828 简单多线程结构分析?? ============================================================================================================?? -----------------------------------------------------[详细]
-
perl 删除过期文件
所属栏目:[大数据] 日期:2020-12-16 热度:161
#!/usr/bin/perl #--------------------------------------------------------- use strict ; my $dir = "dirname/" ; opendir DH , $dir or die "cannot chdir to $dir : $!" for $file ( readdir DH ) { $file eq '.' ) and next '..' if time ) - stat $d[详细]
-
perl编程手册
所属栏目:[大数据] 日期:2020-12-16 热度:98
perl编程手册: -------------------------------手册-------------------------------- perl手册.chm http://vdisk.weibo.com/s/moN-p -------------------------------视频-------------------------------- 俺的视频:http://kan.weibo.com/kan/34927078974[详细]
-
Perl迎来25岁生日
所属栏目:[大数据] 日期:2020-12-16 热度:94
摘要: Perl迎来了它的第25岁生日,普天下Perlist都冒泡同庆一下,很多开发者喜欢它的理由是因其具备强力、稳定、成熟、可移植性等特点,Perl的爱好者们赶快送上你的祝福吧! 昨天,Perl迎来了它的第25岁生日,普天下Perlist都冒泡同庆一下。 Perl是一种高级[详细]
-
用perl生成crypt密码,供nginx做账户验证。
所属栏目:[大数据] 日期:2020-12-16 热度:155
perl生产crypt脚本 cat passwd.pl #!/usr/bin/perl use strict; my $pw=$ARGV[0] ; print crypt($pw,$pw)."n"; ? chmod +x passwd.pl ./passwd.pl 密码 (将输出crypt加密后的密码) ? 加入nginx需要验证的目录 ? server ? { ??? listen?????? 80; ??? server[详细]
-
Perl多进程与多线程简单示例
所属栏目:[大数据] 日期:2020-12-16 热度:168
多进程: #!/usr/bin/perluse strict;use warnings;print "Starting main programn";my @childs;for ( my $count = 1; $count = 10; $count++) {my $pid = fork();if ($pid) {# parent#print "pid is $pid,parent $$n";push(@childs,$pid);} elsif ($pid =[详细]
-
perl coro socket编程(1)
所属栏目:[大数据] 日期:2020-12-16 热度:51
coro提供了perl的非阻塞io.但是作者提供的文档太简略了,例子也没有. 自己尝试写了几个例子. 分别实现CU上仙子提供的例子以及AE自带的echo server例子 相关的模块有 coro:;socket,coro::handle ae::socket,ae::handle ? 先看看传统的socket编程(CU上仙子提供[详细]
-
perl coro socket编程(2)-客户端coro改造
所属栏目:[大数据] 日期:2020-12-16 热度:102
先从客户端开始改造. 把多进程/线程改写成coro的协程是最自然的思路了. coro本身并不一定要求事件,主要是实现无阻塞. 而client主要是发送,可以认为是无阻塞的,所以也可以不用coro::socket. 但是延时是需要用到事件的 可以对比看看 如果用默认的select或者sle[详细]
-
Perl 中的线程(1)
所属栏目:[大数据] 日期:2020-12-16 热度:69
线程概述 线程是一个单一的执行流程,它是所有程序执行过程中最小的控制单位,即能被 CPU 所调度的最小任务单元。线程与进程之间既有联系,又完全不同。简单地说,一个线程必然属于某一个进程,而一个进程包含至少一个或者多个线程。早期的计算机系统一次只[详细]
-
perl anyevent socket编程(1)-echo client/server
所属栏目:[大数据] 日期:2020-12-16 热度:148
?本来是测试coro socket server的,结果没搞定,太面了....coro::socket的文档也太简略了. 先看看anyevent的例子吧,这个出自eg中的ae2.pl 我分成了c/s两个 server代码 use warnings;use strict;use Time::HiRes qw(time);use AnyEvent;#这个是ae的perl实现,要[详细]
-
Perl 中的线程(2)
所属栏目:[大数据] 日期:2020-12-16 热度:117
=========================threads=========================== #!/usr/bin/perl use ? threads ( 'yield' , ???????????? 'stack_size' ? = 64*4096, 'exit' ? =? 'threads_only' 'stringify' ); ? sub ? start_thread { ??? my ? @args ? =? @_ ; ??? prin[详细]
-
perl 基本语法
所属栏目:[大数据] 日期:2020-12-16 热度:69
一.数据类型(Data type): ? Perl 的数据类型大致分为四种:Scalar(变量)、Scalar Array(数组)、Hash Array(散列)、References(指针),看起来虽少但用起来却绰绰有余。尤其在写Perl程序时可以不必事先宣告变量,这一点对刚学程序语言的人甚为方便,[详细]
-
perl中Net::FTP帮助文档
所属栏目:[大数据] 日期:2020-12-16 热度:196
网上搜了一下,发现了这个文档,其他基本就不用再看了: http://search.cpan.org/~gbarr/libnet-1.22/Net/FTP.pm 为方便查阅,截取部分如下: use?Net::FTP; ? ? $ftp?=?Net::FTP-new( "some.host.name" ,?Debug?=?0) ? ?? or ?die? "Cannot?connect?to?some[详细]
-
Perl内置特殊变量
所属栏目:[大数据] 日期:2020-12-16 热度:85
一、 正则表达式 特殊 变量: 1、 $n :包含上次模式匹配的第n个子串 2、 $ :前一次成功模式匹配的字符串 3、 $` :前次匹配成功的子串之前的内容 4、 $’ :前次匹配成功的子串之后的内容 5、 $+ :前一次使用括号的模式匹配的字符串. 二、 文件句柄 特殊 变量:[详细]
-
Perl 命令行
所属栏目:[大数据] 日期:2020-12-16 热度:112
?转自: http://blog.csdn.net/alivio/article/details/6898254 perl - Practical Extraction and Report Language Perl有很多命令行参数,通过它可以让你的程序更简练,并且可以写出很多只有一行命令的perl。在这篇文章里我们来了解一些常用的命令行参数。[详细]
-
perl用Open()函数打开文件
所属栏目:[大数据] 日期:2020-12-16 热度:64
转自: http://bbs.chinaunix.net/thread-643794-1-1.html 在Perl中可以用open或者sysopen函数来打开文件进行操作,这两个函数都需要通过一个文件句柄(即文件指针)来对文件进行读写定位等操作。 下面以open函数为例: 读:open(文件句柄,"文件名")/open([详细]
-
学习perl的reverse,sort,scalar
所属栏目:[大数据] 日期:2020-12-16 热度:85
?学习perl的reverse,sort,scalar,记录一下。 [ root @OTRS perl ] # more reverse_sort_scalar.pl #!/usr/bin/perl -w use strict ; #reverse my @array_reverse = 1 . .3 ; my @array_ed = reverse ( @array_reverse ) ; print " 数组的值为1 2 3,reverse反[详细]
-
perl变量作用域--local,my,our
所属栏目:[大数据] 日期:2020-12-16 热度:120
变量作用域? (一)包变量? $x = 1? 这里,$x是个包变量。关于包变量,有2件重要的事情要了解:? 1)假如没有其他申明,变量就是包变量;? 2)包变量总是全局的。? 全局意味着包变量在每个程序里总可访问到。在你定义了$x=1后,程序的任何其他部分,甚至在其他[详细]
-
Perl求中值
所属栏目:[大数据] 日期:2020-12-16 热度:183
先就按这个标题了吧,其实是求数据的中值,如果不合适请大家见谅 参考数据,感谢网友提供的资料 http://perldoc.perl.org/perllol.html http://blog.sina.com.cn/s/blog_5f8e03960100wq3r.html 大晚上的,闲来无事,碰巧遇到一批数据需要处理,就拿学习中的P[详细]
-
安装perl的CPAN模块整理
所属栏目:[大数据] 日期:2020-12-16 热度:55
1.执行命令: # perl -MCPAN -e shell Can't locate CPAN.pm in @INC (@INC contains: /usr/local/lib/perl5 /usr/local/share/perl5 /usr/lib/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib/perl5 /usr/share/perl5 .). 时候报这个错误,则可以[详细]
-
perl 文件读取
所属栏目:[大数据] 日期:2020-12-16 热度:180
转载地址:http://blog.csdn.net/omohe/article/details/1562515 使用Perl从文件中读取字符串,一般有两种方法: 1. 一次性将文件中的所有内容读入一个数组中(该方法适合小文件): open (FILE , " filename ) || die can?not?open?the?file:?$! ; @filelist[详细]
-
perl中pop与push函数
所属栏目:[大数据] 日期:2020-12-16 热度:189
?一、pop pop:操作将数组的最后一个元素取出并返回: @array=5..9;? $fred=pop(@array); ? ? ?#$fred 得到 9,@array 现在为(5,6,7,8)? $barney=pop@array; ? ?#$barneygets8,@array 现在为(5,6,7) pop@array; ? ? ? ? ? ?#@array 现在为(5,6)(7[详细]
-
perl unicode
所属栏目:[大数据] 日期:2020-12-16 热度:59
目录(?) [-] 实例详细介绍各种字符集编码转换问题 转 Perl对中文的处理问题 perl对中文的处理encodedecode perl与中文信息处理 一文件分割? 二字频统计? 三回文 CMD 命令速查手册 ASSOC AT ATTRIB BREAK CACLS CALL CD CHCP CHDIR CHKDSK CHKNTFS CLS CMD CO[详细]
