-
Perl 调试之使用感受
所属栏目：[大数据] 日期：2020-12-16 热度：159
Perl 作为比较早的一门 脚本语言，很多年纪大的人都爱用 比如偶的美国boss 最近他写了一个转化脚本，我来调试 花了我不下3天，错误的主要原因是正则表达式。 正则表达式匹配错误，倒是后面引用$1的结果为空，或者，使用错误..... oh，mygod...一个错误可以导[详细]
-
perl日常处理脚本收集
所属栏目：[大数据] 日期：2020-12-16 热度：114
1.包含/tablespace/的行 #!/usr/bin/perl open(FL,"1")||die "can't open file"; while(FL){ s/$_/;/ if /tablespace/i; ? print $_; } print "n"; 2.以/tablespace/开头行 ... s/$_/;/ if /^tablespace/i; ? ... 3.tablespace大小写并且行前含有空格情况 #[详细]
-
《中级perl》笔记 - 3， 数组引用 (2)
所属栏目：[大数据] 日期：2020-12-16 热度：194
**简写数组引用** 在解析数组引用的时候,如果括号里面是简单标量,我们可以去掉当中的大括号. @{$items}可以写成@$items ${$items}[1]可以写成$$items[1] 注意,如果括号里面不是简单标量,则不能简写. 例如@{$_[1]} 我们来看看第二个问题怎么解决,即如何在函数[详细]
-
perl文本
所属栏目：[大数据] 日期：2020-12-16 热度：67
perl中文本处理的例子： open(FD,"input.txt")||die("can not open the filen");@line = FD;print @line;close(FD); 网络编译器 一下是输出每个单词的文本处理： open(FD,"input.txt")||die("can not open the filen");$line = FD;@words = split' ',$line[详细]
-
Perl之冒泡排序法
所属栏目：[大数据] 日期：2020-12-16 热度：82
#! /usr/bin/perl -wuse strict;my @list = qw /3 5 6 2 12/;bubble_sort(@list,scalar @list);print "@listn";sub bubble_sort { my $arrays_ref = shift || ""; my $num = shift || ""; for (my $i = 0; $i $num - 1; $i++) { for (my $j = 0; $j $num -[详细]
-
perl脚本学习日记
所属栏目：[大数据] 日期：2020-12-16 热度：169
获得打印句柄 例: 例9.4 (From?a?Script) 1?while(DATA){ 2? print?if?/[A-Z][a-z]eve/; } _?_DATA_?_ Steve?Blenheim?101 Betty?Boop?201 Igor?Chevsky?301 Norma?Cord?401 Jonathan?DeLoach?501 Karen?Evich?601 (Output) Steve?Blenheim?101 打开文件句柄[详细]
-
Perl内置特殊变量
所属栏目：[大数据] 日期：2020-12-16 热度：164
一、 正则表达式 特殊 变量： 1、 $n ? :包含上次模式匹配的第n个子串 2、 $? :前一次成功模式匹配的字符串 3、 $` ? :前次匹配成功的子串之前的内容 4、 $’? :前次匹配成功的子串之后的内容 5、 $+ :前一次使用括号的模式匹配的字符串. 二、 文件句柄 特殊[详细]
-
perl编写CGI 尝试
所属栏目：[大数据] 日期：2020-12-16 热度：175
一直觉得perl写网页是一件很原始的事情，编写CGI-使用perl的书刚借来就弄丢了。后来帮群里的小朋友讨论到CGI，觉得有点意思，就尝试学了一下，编写了一个简单的，保存邮件列表，和现实邮件列表的就简单CGI，如下： #!/opt/lampp/bin/perluse CGI;use Data::D[详细]
-
perl引用
所属栏目：[大数据] 日期：2020-12-16 热度：143
Table of Contents 1 深入分析 1.1 直接引用(hard reference) 1.2 符号引用(软引用） 1.3 箭头运算符 1.4 匿名数组、hash表和子程序 2 快速解决方案 2.1 创建直接引用 2.1.1 对标量、数组、hash、子程序的引用 2.1.2 引用和自动生成 2.1.3 按引用传递 2.1.4[详细]
-
Perl基本技一：马克输出——OUTPUT原格式输出（print STDOUT <
所属栏目：[大数据] 日期：2020-12-16 热度：167
sub ShowUsage { print STDOUT "EOF"; moniter my computer disk usage: $0 file [-d] [-h] -d: excute -h: this (help) message EOF } EOF 是一个标记的名字，自定义标记名称[详细]
-
IIS6.0配置支持perl
所属栏目：[大数据] 日期：2020-12-16 热度：101
环境： ??? Windows Server 2003 R2 Exterprise Server Pack 2 ??? IIS6.0 ? 1、首先安装ActivePerl，下载地址： http://activestate.com/Products/ActivePerl/ activePerl完成安装后，没有iis里注册服务扩展，点击添加服务扩展，添加完成如下： ? 扩展名不[详细]
-
perl语言中qq, qw等关键字的用法总结
所属栏目：[大数据] 日期：2020-12-16 热度：64
PERL 语言中的q,qw,qr,qx,qq......符号用法总结 在perl语言中，有两个特殊而常用的符号qq qw,分别解释如下： qq{foobar}的意思为意思为双引号字符串，可内插变量 相当于 "foobar" qw{foo bar}的意思为用空格分解字符串，得到列表，相当于如下语句 split(' ',[详细]
-
自己联系的一个小perl
所属栏目：[大数据] 日期：2020-12-16 热度：185
#!/usr/bin/perl my %a = ("id" = "0101","className" = "jane01"); my %b = ( id="0101",className="jane01"); my %c =( id,"0101",className,"jane01"); print $a{"id"},"n"; print $b{id},"n"; print $c{id},"n"; print %c-{className},"n"; ########[详细]
-
perl DBI 总结
所属栏目：[大数据] 日期：2020-12-16 热度：146
最近在写perl程序进行数据的采集，perl教程在网上少的可怜呐，至少我找到的资料是很少的。在连接数据库方面下面这个博客写的还是很清晰的，所以就转过来了。 源文地址：http://blog.csdn.net/like_zhz/article/details/5441946 DBI和DBD的不同关系模型： ###[详细]
-
使用perl+MongoDB实现一个WEB站点请求耗时日志分析系统
所属栏目：[大数据] 日期：2020-12-16 热度：65
PS:从我的新浪博客搬过来的文章 ? ??? 前段时间部门要我统计各个web应用的请求耗时情况，以便各个组能找出耗时多的功能进行优化。其实这个分析看似比较简单，只要拿到各个web应用的access日志就很容易获得所有请求的耗时。但调查了实际环境以后发现要填的坑[详细]
-
perl学习1
所属栏目：[大数据] 日期：2020-12-16 热度：156
perl 作为一种灵活处理文本的语言，在日常处理文本信息时将大有用 使用情况：如果在处理数据库信息时，由于很多单属于资料机密保护，一般禁止工具直接数据库，这样信息大部份都会生成文本文件，而大批的文件需要加工处理，来达到自己的目的，在这种情况下per[详细]
-
perl简介
所属栏目：[大数据] 日期：2020-12-16 热度：154
（1）Perl 最初的设计者为 拉里·沃尔 （Larry Wall），他于1987年12月18日发表。Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。其中最重要的特性是它内部集成了 正则表达式 的功能，以及巨大的第三方代码库CPAN。简而言之，Perl象C一[详细]
-
perl 使用memcached客户端
所属栏目：[大数据] 日期：2020-12-16 热度：78
http://search.cpan.org/~dormando/Cache-Memcached-1.30/lib/Cache/Memcached.pm 1.安装 cpan Cache::Memcached 2.使用例子? #! /usr/bin/perluse strict;use warnings;use Data::Dumper;use Cache::Memcached;my $memd = new Cache::Memcached {'servers'[详细]
-
安装perl和DBI-mysql出现的一些问题
所属栏目：[大数据] 日期：2020-12-16 热度：128
安装perl后， 因为想要运行innotop，mytop之类的perl文件。 所以出现了一系列问题： 1. Can't locate Time/HiRes.pm in 原因：perl包没有安装完全。 解决办法： .pm实际上是Perl的包，只需安装如下软件包即可： yum install perl-Time-HiRes 2. failed: Can'[详细]
-
Program perl 数据结构
所属栏目：[大数据] 日期：2020-12-16 热度：143
Table of Contents 1 数组的数组 1.1 创建和访问二维数组 1.2 自行生长 1.3 访问和打印 1.4 片段 2 数组的散列 2.1 数组的散列的组成 2.2 生成数组的散列 2.3 访问和打印数组 3 散列的数组 3.1 散列的数组的组成。 3.2 生成散列的数组 3.3 访问和打印散列的[详细]
-
关于perl的ref 函数
所属栏目：[大数据] 日期：2020-12-16 热度：150
我们都知道perl有引用的概念：一组数据实际上是另一组数据的引用。这些引用称为指针，第一组数据中存放的是第二组数据的头地址。引用的方式被用得相当普遍，特别是在面向对象的模块、函数的参数传递等常见。但perl对每个引用都是以一个普通的变量来定义的，[详细]
-
perl中undef值defined函数
所属栏目：[大数据] 日期：2020-12-16 热度：161
undef简介 ? 变量在第一次赋值前有一个特殊值undef，按照Perl来说就是： “这里什么也没有，请继续” 。如果这里的“什么也没有”是一些“数字” ，则表现为 0。如果是“字符串” ，则表现为空串。但undef 既非数字也非字符串，它是另一种标量类型。 [root@l[详细]
-
Perl读写Excel
所属栏目：[大数据] 日期：2020-12-16 热度：84
#读取excel，支持2003 和2007 #LJL use Encode; use Spreadsheet::XLSX;? use Spreadsheet::ParseExcel; my $file; ? ? ? ? #Excel path my $sheetName; ? ?#WorkSheet name sub readXlsx2007{ my $excel = Spreadsheet::XLSX - new ($file,$converter);? my[详细]
-
Perl学习一: Hello World
所属栏目：[大数据] 日期：2020-12-16 热度：61
OS:WINDOWS XP 下载perl : http://www.perl.org/get.html 我下载的是Strawberry Perl，下载的是一个msi包，安装过程省略 安装完成后，在开始菜单找到Strawberry Perl-Perl (command line)，打开perl命令行窗口 输入perl -v，查看perl的当前版本号 尝试运行一[详细]
-
Perl用LWP库简单发送Get/Post
所属栏目：[大数据] 日期：2020-12-16 热度：71
有段时间没有更新日志了，刚收拾好心情，今天补上一篇，关于用Perl的LWP库来发送Get和Post信息的，也就是读取某一网址的方法。 在网上找了一些中文的帖子，感觉很杂，最后还是参考http://de.wikibooks.org/上的一篇文章，写的简单明了，测试了一下有效无误。[详细]
