-
《Advandced Perl Programming》第七章、POE(1)
所属栏目：[大数据] 日期：2020-12-16 热度：67
原文链接:?http://blog.yikuyiku.com/?p=1259 这一章，我们一起来看看被Mark-Jason Dominus称为“Perl5里最有意思的进化”的Perl Object Environment。 POE有很多用途，列举一些如下： 提供了一个堪比线程和IPC的多任务调度机制； 简化了以协议为基础的网络[详细]
-
Perl自定义模块
所属栏目：[大数据] 日期：2020-12-16 热度：62
1：模块的文件名： ? ?perl5以.pm结尾 2：放置目录： ? ? ?可以放在自定义目录（目录位置必须加入@INC) ? ? ? 或放在调用这个模块的文件的当前目录; ? ? ?或放到perl5 pm的固定目录（/usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi），这个因系统而异；[详细]
-
perl从键盘上读取输入作为字符串和列表的方法
所属栏目：[大数据] 日期：2020-12-16 热度：67
STDIN 读取输入做为字符串 $test=STDIN;#从键盘上读取输入的行作为变量test的值,这种方式只读取一行 print $test; ?#这种方式读取出来的内容，是以换行符为结束的 读取输入做为列表 chomp(@test=STDIN);#从键盘上读取输入内容做为列表test的值,这种方式把每[详细]
-
perl_常用的函数
所属栏目：[大数据] 日期：2020-12-16 热度：113
这里说的是一些常见的内置函数： 时间函数： time; 返回1970年1月1日起经过的无跳跃秒数。可以用gmtime和localtime函数做进一步的处理。 times; 返回一个四个元素的列表，给出当前进程及其子进程用户和系统时间，精确到秒。 （$user,$system,$cuser,$csystem[详细]
-
perl笔记
所属栏目：[大数据] 日期：2020-12-16 热度：106
学习网址：http://www.cbi.pku.edu.cn/chinese/documents/perl/perl2.htm 一、基础 ? 1：以#! /usr/local/bin/perl -w开头 ??????? 整数是浮点数特例，寄存在浮点寄存器中。0开头是八进制、0x是16进制。 ??????? 定义变量：$var = "some data"; 或者 $var =[详细]
-
perl库及函数
所属栏目：[大数据] 日期：2020-12-16 热度：186
use strict; use warnings; use Encode; use DBI; #关系型数据库 use MIME::Base64; #base64编解码 use MIME::QuotedPrint;? #可打印字符编码 use Encode; use Cache::Memcached;? #memcache缓存库 use Getopt::Long; =========================DBI=========[详细]
-
perl --2013-4-9 sprintf与here文档
所属栏目：[大数据] 日期：2020-12-16 热度：105
1.SPRINTF与PRINTF不同是，SPRINTF可以将执行的结果赋给变量； [root@zbk11g ~]# perl p9 the data is??????? KFC [root@zbk11g ~]# [root@zbk11g ~]# [root@zbk11g ~]# more p9 #!/usr/bin/perl $cc=sprintf("the data is %10sn","KFC"); print $cc; 2.her[详细]
-
Perl多行注释
所属栏目：[大数据] 日期：2020-12-16 热度：50
最常用的方法是使用 POD(Plain Old Documentations) 来进行多行注释。方法如下: =pod codes to comment =cut 注意：=pod =cut只能在行首 以=开头，以=cut结尾。 注意：=后面要紧接一个字符。=cut后面可以不用。[详细]
-
Spreadsheet::Read的简单使用
所属栏目：[大数据] 日期：2020-12-16 热度：187
? 该模块不能单独使用，需要结合一些模块来使用，在cpan里的描述是这样的。 ? ? ? ? ? ? ? ? 这里需要使用这个模块来读取excel的文件，由于是xlsx格式的，所以，还得需要预先安装Spreadsheet::XLSX这个模块。代码如下： #!/usr/bin/perl?-w ? use?strict;? u[详细]
-
Perl列表和数组用法的总结
所属栏目：[大数据] 日期：2020-12-16 热度：111
总结一下Perl中列表和数组操作的一些用法 假设定义一个数组变量@arr,将列表（str_a,str_b,str_c,str_d）赋值给数组@arr @arr?=?(str_a,?str_b,?str_c,?str_d);? 将数组@arr的元素个数赋值给$var $var?=?@arr;? 打印这个数组@arr，并且数组中的元素以空格分隔[详细]
-
perl横竖转换
所属栏目：[大数据] 日期：2020-12-16 热度：142
#system 'cat 11.csv | perl -nale 'for (0 .. $#F) { $r[$_] .= $F[$_] . " " }; END { print for @r }' 11.txt';#system 'cat 12.csv | perl -nale 'for (0 .. $#F) { $r[$_] .= $F[$_] . " " }; END { print for @r }' 12.txt';#system 'cat 13.csv | per[详细]
-
Perl哈希的用法总结
所属栏目：[大数据] 日期：2020-12-16 热度：154
?对Perl中哈希用法的总结 用胖箭头对哈希键值对进行赋值 %some_hash?=?( 'jim' ?=? '20' ,? 'tom' ?=? '18' ,? 'jerry' ?=? '21' );? 将哈希转换为列表 %any_hash?=?(k1, 'v1' ,k2, 'v2' ,k3, 'v3' ,k4, 'v4' );? @arr?=?%any_hash;? keys函数,将哈希中的键[详细]
-
Perl学习笔记----文件头
所属栏目：[大数据] 日期：2020-12-16 热度：129
#!/usr/bin/perl -w eval 'exec /usr/bin/perl -w -S $0 ${1+" $@"}' ??? if 0; # not running under some shell ? ? 当我们不确定perl安装目录的时候可以这么写 #!/usr/bin/perl -w eval “exec perl -w -S $0 $ @” ??? if 0; # not running under some sh[详细]
-
Perl模块用法指南
所属栏目：[大数据] 日期：2020-12-16 热度：123
? 本文和大家重点讨论一下Perl模块的应用，多数大型程序都分割成多个部件，每一部件通常含有一个或多个子程序及相关的变量，执行特定的一个或多个任务。集合了变量和子程序的部件称为程序Perl模块。 Perl模块 1、创建Perl模块 Perl5中用包来创建Perl模块，方[详细]
-
通过 Perl 编程访问 DB2 Universal Database
所属栏目：[大数据] 日期：2020-12-16 热度：119
简介 Perl（Practical Extraction and Report Language）是一种功能强大而又非常简单易用的编程语言，在很多操作系统上都可以使用。Perl 是免费的。我们可以（以源代码或二进制的格式）下载这个语言，并可以免费地使用它。 Perl 日渐成为一种广受欢迎的语言[详细]
-
perl 采用正则表达式替换字符串处理
所属栏目：[大数据] 日期：2020-12-16 热度：144
替换功能和quotemeta 有时候你不仅希望找到你想要那些字符串，还想替换掉它们。还记得前面说的匹配符后面的m符号么？现在是使用另一个，s符号(替换，subplace)的时候了。 $string =~ s/apple/apple/i; 上面表达式将$string里所有不用形式的apple统一成全小写[详细]
-
perl笔记-----switch
所属栏目：[大数据] 日期：2020-12-16 热度：83
还在perl中拼命的写if...elsif...elsif..else...么，其实perl有switch， 而且我感觉perl的switch比神马高级语言的switch都强大。 look： 测试结果： 如果在一个block中有一个my修饰的变量和外界的一个变量同名，而且又需要在这个block中使用外界变量时，两个[详细]
-
perl 学习 --2013-4-11
所属栏目：[大数据] 日期：2020-12-16 热度：118
内容： 1.q,qq,qw,qx 2.$_ 3.打开文件2种方式 4.defined,undef 执行（1） [root@zbk11g ~]# perl -e' print q/this is a biken/; ' this is a biken[root@zbk11g ~]# [root@zbk11g ~]# perl -e' print qq/this is a biken/; ' this is a bike [root@zbk11[详细]
-
POE状态机入门与进阶
所属栏目：[大数据] 日期：2020-12-16 热度：187
一．前言 至于POE的应用，我不想多说什么，因为需要使用状态机的地方太多。 举一个极端的例子，windows下的perl-tk对于多线程的支持极不稳定，如果在其中加入一个大数据量的处理应用， 结果往往会是一个无法动弹的程序。这时除了使用POE，也许没有更好的解决[详细]
-
Perl中正则表达式用法总结
所属栏目：[大数据] 日期：2020-12-16 热度：187
"." 用来匹配任意一个字符的通配符，"n"换行符除外 "*" 用来匹配前面条目出现零次或多次 "+" 用来匹配前面条目出现一次以上 "?" 用来匹配前面条目出现一次或者不出现 "()" 用来对字符串分组，1 或 2 可以反向引用括号里的字符串，相应的数字表示对应顺序[详细]
-
Perl数组和列表简介
所属栏目：[大数据] 日期：2020-12-16 热度：158
http://developer.51cto.com/art/201007/212857.htm 本文和大家重点讨论一下Perl语法中Perl数组和列表，列表是包含在括号里的一序列的值，可以为任何数值，也可为空，如：(1,5.3,"hello",2)，空列表：()。 Perl语法?? Perl数组和列表简介 一、列表 列表是包[详细]
-
perl进程管理
所属栏目：[大数据] 日期：2020-12-16 热度：95
系统函数 == 最简单的系统调用 system "date"; # Perl会将 date 命令传递给unix的shell并获取返回值和error信息等 == 带有系统参数的系统调用 system 'ls -l $HOME' 注意，这里使用了单引号，目的是暗示$HOME是系统的变量而不是PERL的变量 == 系统函数调用时[详细]
-
perl解析ip的经典方法
所属栏目：[大数据] 日期：2020-12-16 热度：106
my $e = qr/[01]?[0-9]?[0-9]|2[0-4][0-9]|25[0-5]/;my $match_ip = qr/($e).($e).($e).($e)/;if ( $str =~ /^$match_ip$/ ){ print "$1,$2,$3,$4.n";}[详细]
-
perl语言入门第8章练习题
所属栏目：[大数据] 日期：2020-12-16 热度：180
1. [8]使用模式测试程序。创造一个模式能匹配字符串match。使用字符串beforematchafter 进行测试。输出结果将其三部 分放在正确位置了吗？ #! /usr/bin/perlwhile(){ #获取输入，从文件或者是从键盘 if(/match/){ print "It matches $`$$'n";//打印出匹配的[详细]
-
perl常用参数说明
所属栏目：[大数据] 日期：2020-12-16 热度：140
参数 -n和-p -e -i 1.-n和-p 增加了循环的功能,使你可以一行一行来处理文件 2.-e 可以让Perl程序在Perl命令行上运行. 例如,我们可以在Perl命令行上运行"HelloWorld"程序而不用把它写入文件再运行. $perl-e'print"HelloWorldn"' 3:-i 把源文件更名然后从这个[详细]
