-
目录中文件内容处理小工具
所属栏目:[大数据] 日期:2020-12-16 热度:97
#!perl -wuse strict;my @DatFileNames = glob "*.dat";print @DatFileNames;my $FileHandle;my $OutPutFileHandle;my $FileName;$^I = ".bak";mkdir "back";foreach $FileName (@DatFileNames){open $FileHandle,"",$FileName or die "can't open file($!)/[详细]
-
perl pod document
所属栏目:[大数据] 日期:2020-12-16 热度:88
1. quick start ? http://juerd.nl/site.plp/perlpodtut ? 2. how to generate html format file? ? http://perldoc.perl.org/pod2html.html[详细]
-
perl 文件操作总结
所属栏目:[大数据] 日期:2020-12-16 热度:89
一、打开、关闭文件 二、读文件 三、写文件 四、判断文件状态 五、命令行参数 六、打开管道 一、打开、关闭文件 ??语法为open (filevar,filename),其中filevar为文件句柄,或者说是程序中用来代表某文件的代号,filename为文件名,其路径可为相对路径,亦可[详细]
-
使用perl-ldap修改a user's password in MS Active Director
所属栏目:[大数据] 日期:2020-12-16 热度:137
1.安装perl-ldap ? 下载地址:http://search.cpan.org/~gbarr/perl-ldap/ ? 前提是已经安装perl工具包。首先查看perl版本 ? [root@local~]perl -V ? Built under linux ? Compiled at Nov? 8 2007 06:49:06 ? @INC: ??? /usr/lib64/perl5/site_perl/5.8.8/x8[详细]
-
免费电子书列表
所属栏目:[大数据] 日期:2020-12-16 热度:155
在StackOverflow上,有人要打算收集个免费电子书的列表,结果很快就有人分享了一个列表。很不错,我就转过来了。原帖的地址在http://stackoverflow.com/questions/194812/list-of-freely-available-programming-books?(注意:有些连接可能会被墙掉) List o[详细]
-
agcc
所属栏目:[大数据] 日期:2020-12-16 热度:177
CSDN搞什么阿,连个附件都发不出来!只有新开帖子,贴出这个脚本(还竟然没有perl的代码编辑器???!!) ? http://blog.csdn.net/rozenix/archive/2011/03/23/6271601.aspx[详细]
-
perl--模块安装方法和常用模块
所属栏目:[大数据] 日期:2020-12-16 热度:66
CPAN(Comprehensive Perl Archive Network)是internet上Perl模块最大的集散地,包含了现今公布的几乎所有的perl模块。网址:http://www.cpan.org/ http://search.cpan.org/,可以查找任何一个模块并提供下载 Linux/Unix---perl模块的安装方法 Linux/Unix下[详细]
-
perl中数组变量的初始化
所属栏目:[大数据] 日期:2020-12-16 热度:168
应该使用(),而不是“”,否则会在前面加上一个“ ”. ? #!/usr/bin/perl -wmy @array1 = "";my @array2 = ();push(@array1,"1");push(@array2,"1");print "array1 is@array1/n";print "array2 is@array2/n"; ? 运行结果 ? array1 is 1array2 is1[详细]
-
perl中的defined和exists
所属栏目:[大数据] 日期:2020-12-16 热度:116
From: http://hi.baidu.com/wangj998/blog/item/3a8d63e9b5b7c035b90e2d3b.html ? exists ? ? [root@localhost~]# cat 1.pl #!/usr/bin/perl -w use strict; my $a; my $b=""; my $c=1; print "a ok/n" if ( defined $a ); print "b ok/n" if ( defined $b )[详细]
-
perl语言中的标量数据(一)
所属栏目:[大数据] 日期:2020-12-16 热度:86
perl语言中的标量数据 1. 数字 支持加、减、乘和 除以及取模操作符,同时支持乘幂操作符(如2**3=8) 2. 字符串 单引号内的字符串直接量 双引号内的字符串直接量 字符串可以用.操作符拼接起来,两边的字符串都不会因此而被改写。 还有一个比较特殊的字符串重[详细]
-
Perl内置及特殊变量
所属栏目:[大数据] 日期:2020-12-16 热度:190
一、正则表达式 特殊 变量: 1、$n:包含上次模式匹配的第n个子串 2、$:前一次成功模式匹配的字符串 3、$`:前次匹配成功的子串之前的内容 4、$’:前次匹配成功的子串之后的内容 5、$+:前一次使用括号的模式匹配的字符串. 二、文件句柄 特殊 变量: 1、$|:如果[详细]
-
来看一道Perl面试题
所属栏目:[大数据] 日期:2020-12-16 热度:175
据说这道题是 QQ 的,看下怎么解答为好 题目: 把当前目录下(包含子目录)下所有后缀为.sh的文件后缀变更为.shell(用PERL完成) 一、先人为的制造一些.sh文件 这个用shell吧,方便 for?i?in?`seq?100`;do?touch?$i.sh;done? for?i?in?testa?testb?testc?te[详细]
-
perl 读写excel表格
所属栏目:[大数据] 日期:2020-12-16 热度:126
因为工作需要,给一些内容的结果需要转换成excel给上面看,所以用perl来实现这个事件,发现perl来写excel实在是太容易了。。我真想学老罗的讲"太容易了,实在是太容易了". 在 2000 年,Takanori Kawai 和 John McNamara 编写出了 Spreadsheet::WriteExcel 和[详细]
-
Perl学习笔记 之 [ 函数, 参数, @_, $_, $_[0], shift ]
所属栏目:[大数据] 日期:2020-12-16 热度:92
Perl学习笔记 之 [ 函数,参数,@_,$_,$_[0],shift ] 1. Perl函数 ??通过 调用. 2. Perl参数 ??Perl天然支持可变数目个参数。 ??在函数内部,所有参数按顺序放在数组 @_ 中。 ??在函数内部,$_[0] 表示函数的第一个参数。其余类推。 3. shift ??shift 后跟一个[详细]
-
perl写的猜数游戏
所属栏目:[大数据] 日期:2020-12-16 热度:100
? #!/usr/bin/perl ? ? use?strict; ? ? my?$count= 0 ; ? ? print ? "please?input?a?number?between?0-10000?which?is?int.n" ; ? ? $rand_num=int?(rand( 10000 )); ? ? do{? ? ? ????????$count++; ? ? ????????chomp(?$input_num=); ? ? ? ???????? if[详细]
-
什么情况下使用断言?
所属栏目:[大数据] 日期:2020-12-16 热度:159
最近写代码时考虑的一个问题,从来没有问过大牛,或看过大牛的书,来理清心里的这个疑惑。今天google了下,留个记号方便自己以后复习,为防止Internet链接失效,把看过的内容抄到下面。。 ? http://book.51cto.com/art/201002/182682.htm ? 某一段代码需要对[详细]
-
perl hash 按值排序 升序 降序
所属栏目:[大数据] 日期:2020-12-16 热度:112
降序 foreach my $key (sort? { $hashT{$b} = $hashT{$a} } keys %hashT){ ??? printf("%s/t%s/n",$key,$hashT{$key}); } 升序 foreach my $key (sort? { $hashT{$a} = $hashT{$b} } keys %hashT){ ??? printf("%s/t%s/n",$hashT{$key}); } Attention:只是a[详细]
-
perl检测网站首页状态
所属栏目:[大数据] 日期:2020-12-16 热度:117
perl检测网站首页状态代码,随便写的,一起交流 #!/usr/bin/perl?-w? ? use ?strict;? use ?LWP::UserAgent;? use ?Net::SMTP;? use ?POSIX?qw/ strftime /;? ? print?EOF;? +--------------------------------------+? +----made?by?Henry?He?on?2011/03/03[详细]
-
探MTK环境之谜
所属栏目:[大数据] 日期:2020-12-16 热度:79
??? 在网上看到了许多 MTK 搭建环境的文章,写的很全面,但是真要搭起来还真的是够呛,其实 MTK 的环境搭建是一个很简单的过程,只是用到的工具繁多,还跟版本有直接的关系,网上对于工具软件的下载实在是少之又少,所以才显的麻烦。(我目前使用的是 35 的[详细]
-
使用perl构造自己所属的专用词库
所属栏目:[大数据] 日期:2020-12-16 热度:104
? 1.文章目的及背景介绍: 前几天购买的英语词汇书中附赠了一款软件,能够按照书中的每一章的词汇进行考查,提供的考查方式有'看英文选中文'、'听音选中文'、'看中文选英文'和'单词拼写'这几项,很是符合我的需求。但是在使用了几个单元之后,发现了一个很重要[详细]
-
perl ASCII码转换函数
所属栏目:[大数据] 日期:2020-12-16 热度:117
chr chr(65) is "A" in either ASCII or Unicode,and chr(0x263a) is a Unicode smiley face. Negative values give the Unicode replacement character (chr(0xfffd)),except under the bytes pragma,where low eight bits of the value (truncated to an i[详细]
-
perl DBI使用详解
所属栏目:[大数据] 日期:2020-12-16 热度:154
使用DBI的方法: --------------------------------------------------------------------- use DBI; --------------------------------------------------------------------- 注意:特定的DBD 级的模块不需要包括use 行,因为在与服务器进行连接时, DBI[详细]
-
perl 常用内置变量
所属栏目:[大数据] 日期:2020-12-16 热度:138
1. $_ ? $ARG,经常 是 一个默认变量 ? 2. @_ ? @ARG,子例程参数表 ? 3. {row.content} ? $PROGRAM_NAME,本程序 的 名字 ? 4. @ARGV ? 本程序 的 命令行参数表 ? 5. $" ? $LIST_SEPARATOR,数组内插到双引号字符串中时所用 的 分隔符, ? 默认为空格 ? 6.[详细]
-
perl 常用内置变量
所属栏目:[大数据] 日期:2020-12-16 热度:190
1. $_ ? $ARG,经常 是 一个默认变量 ? 2. @_ ? @ARG,子例程参数表 ? 3. {row.content} ? $PROGRAM_NAME,本程序 的 名字 ? 4. @ARGV ? 本程序 的 命令行参数表 ? 5. $" ? $LIST_SEPARATOR,数组内插到双引号字符串中时所用 的 分隔符, ? 默认为空格 ? 6.[详细]
-
perl 常用内置变量
所属栏目:[大数据] 日期:2020-12-16 热度:117
1. $_ ? $ARG,经常 是 一个默认变量 ? 2. @_ ? @ARG,子例程参数表 ? 3. {row.content} ? $PROGRAM_NAME,本程序 的 名字 ? 4. @ARGV ? 本程序 的 命令行参数表 ? 5. $" ? $LIST_SEPARATOR,数组内插到双引号字符串中时所用 的 分隔符, ? 默认为空格 ? 6.[详细]
