-
configure选项
所属栏目:[大数据] 日期:2020-12-16 热度:193
? 1、 configure --prefix=/tools --disable-nls --prefix=/tools 这个参数告诉 configure 脚本,应该把 Binutils 软件包中的程序安装到 /tools 目录中。 --disable-nls 这个参数禁止了国际化(通常简称i18n),静态程序不需要国际化的特性。 2、 configure --[详细]
-
perl采用File::Path管理多级目录
所属栏目:[大数据] 日期:2020-12-16 热度:161
1.?File::Path 介绍 The make_path function creates the given directories if they don't exists before,much like the Unix command mkdir -p . The remove_tree function deletes the given directories and any files and subdirectories they might co[详细]
-
Learning Perl 9
所属栏目:[大数据] 日期:2020-12-16 热度:61
?1. 包 (1).将数据和函数包装到单独的命名空间中称为封装(encapsulation)。Perl中的包相当于C++中的命名空间,包的作用域是从包的声明到包含在最内层的块,包中的所有变量都有一个单独的符号表,同一包名下使用变量可以省略前缀。缺省包名的包也称main包。要[详细]
-
Perl、PHP、Python、Java和Ruby的比较
所属栏目:[大数据] 日期:2020-12-16 热度:85
预览 ◆ 语言的发展趋势一定是动静结合、刚柔并济 ◆ Perl凝练晦涩,Python优雅明晰,Ruby精巧灵动,PHP简明单纯 ◆ 或许优雅正是来自对细节和规范的重视 ◆ (RoR)与Ruby结合之后,便如一只猱身而上灵猫,立刻衬托出Java和.NET大象般的身影 提问 ◆ Perl、Py[详细]
-
基于HTK的语音拨号系统
所属栏目:[大数据] 日期:2020-12-16 热度:111
? 基于HTK的语音拨号系统 ?转自Veket?http://blog.csdn.net/chenah/article/details/6568346 目标: 该系统能够识别连续说出的数字串和若干组姓名。建模是针对子词(sub-word,eg..音素),具有一定的可扩充性。当加入一个新名字时,只需修改发音词典和任务语[详细]
-
symbian环境搭建
所属栏目:[大数据] 日期:2020-12-16 热度:148
环境搭建 我们的软件共享目录为“//192.168.1.110/setup.mobile/symbian” 1.??????安装 perl/ActivePerl网络工具5.6.1.638-MSWin32.msi 文件; a)????????要求perl的版本为5.6.1版本,不要高; 2.??????安装 jdk/jdk-6u7-windows-i586-p.exe 软件; a)?????[详细]
-
print输出数组的不同操作
所属栏目:[大数据] 日期:2020-12-16 热度:168
print "@array";# 打印数组中的每个元素,每个元素之间用空格隔开。 print @array;# 打印数组中的每个元素,每个元素之间无空隔 print scalar(@array);# 输出数组元素个数 print @array."n";#输出数组元素个数加换行[详细]
-
perl map,seek,read
所属栏目:[大数据] 日期:2020-12-16 热度:128
http://blog.chinaunix.net/space.php?uid=24504673do=blogid=91555 map: Perl里面的map,是一种道具,可以让你的函数或者表达式,很方便地施用到一系列对象上去。 1. 让我们先看map的语法 map BLOCK LIST map EXPR,LIST BLOCK是一个用{}包围的代码块。EXPR可[详细]
-
Perl 面向对象编程时 bless()函数的使用
所属栏目:[大数据] 日期:2020-12-16 热度:167
1、说明 本程序演示了在Perl中如何进行面向对象 编程 :演示程序包含两个 文件 :person.pl 和 person.pm,把 person.pl 和 person.pm 放在当前目录下,运行" perl person.pl"即可以看到结果。person.pm定义了名为person的类。person.pl中创建了person类的实[详细]
-
Perl 正则表达式匹配计数
所属栏目:[大数据] 日期:2020-12-16 热度:156
最近做实验时遇到这样的需求:统计某一 term 在 doc-u-ment 中的 TF (term fre-quen-cy),即词频。借助 perl 完成,自然想到构造正则表达式进行匹配计数。目前可以找到的匹配计数方式有好几种: 假定 $string 是需要进行统计的字符串, $regex 是进行匹配的[详细]
-
perl处理文本
所属栏目:[大数据] 日期:2020-12-16 热度:71
? ?公司大批量添加VPN用户,如果一个一个添加手就脱臼了? ?... ? ? 主配置文件change.conf大体如下: li.jie ? ? ?pptpd ? ? ? Li.jiE ? ?192.168.1.1 dong.zhuo ? pptpd ? ? ? Dong.zhuO 192.168.1.2 .... ...... 姓.名 ? ? ?服务名 ? ? ? 姓.名(首大写,尾大[详细]
-
Perl文件系统
所属栏目:[大数据] 日期:2020-12-16 热度:118
一、文件输入/输出函数 1、基本I/O函数 open:允许程序访问文件? close:终止文件访问? print:文件写入字符串? write:向文件写入格式化信息? printf:格式化字符串并输出到文件? 1)open函数 open函数将文件变量与某文件联系起来,提供访问文件的接口,例如[详细]
-
Perl开发的学习-4
所属栏目:[大数据] 日期:2020-12-16 热度:100
Perl 列表和数组比较相像,但与简单变量是完全不同的,也是Perl中比较强大的功能。一般如C、Java中是不存在列表概念,但在其它一些语言如Ruby中是存在的。列表的声明也是用@a来表示。 [root@windriver-machine test]# cat arr.pl #!/usr/bin/perl print "sin[详细]
-
Perl调用shell命令
所属栏目:[大数据] 日期:2020-12-16 热度:190
1. system(”command”); 使用该命令将开启一个子进程执行引号中的命令,父进程将等待子进程结束并继续执行下面的代码。 2. exec(”command”); 效果同system命令类似,区别是不会开启子进程,而是取代父进程,因此执行完引号中的命令后进程即结束。一般和fo[详细]
-
2011-08-03 Music Genre classification Scripts
所属栏目:[大数据] 日期:2020-12-16 热度:193
scripts: (1) Batch extract all the feature sets using OpenSmile:???? perl stddirectory_smileextract.pl /home/sudan/Desktop/research/MusicGenreClassification/genres_16k_mono_wav/ emobase.conf out.arff (2) Using bextract to do the prediction[详细]
-
perl实现16进制数转换成10进制数
所属栏目:[大数据] 日期:2020-12-16 热度:59
16进制数转换成10进制数,通过Math:BigInt模块实现 #!/usr/bin/perl use warnings; use strict; use Math::BigInt; my %hex_hash = (0=0,1=1,2=2,3=3,4=4,5=5,6=6,??7=7,8=8,9=9,a=10,b=11,c=12,d=13,e=14,f=15); ???? sub hex_to_dec{ ??my $data = shift;[详细]
-
perl中seek函数的用法
所属栏目:[大数据] 日期:2020-12-16 热度:50
seek 设置文件的当前位置! 当一个文件非常大时可以从指定位置读起。 seek FILEHANDLE,POSITION,WHENCE 成功返回真,失败返回假。 POSITION 是读入的新位置(字节)。 WHENCE有3个值,0表示新位置是POSITION,1表示当前位置加上POSITION,2表示文件尾加上POSI[详细]
-
perl读写xml
所属栏目:[大数据] 日期:2020-12-16 热度:113
一 读xml 1)xml实例 ?xml version="1.0" encoding="UTF-8"? employees? ??employee age = "30" ?? ?namelinux/name ?? ?countryUS/country ??/employee ? ??employee age = "10" ?? ?namemac/name ?? ?countryUS/country ??/employee ??employee age = "20"[详细]
-
详解Perl字符串比较和整数比较的区别
所属栏目:[大数据] 日期:2020-12-16 热度:100
本文和大家重点讨论一下Perl字符串比较和整数比较,算术运算符的比较有大于,小于,等于,不等于等关系,而Perl字符串比较也不例外,这里向大家详细介绍一下。 Perl字符串比较和整数比较 Perl字符串比较操作符 操作符描述 lt小于 gt大于 eq等于 le小于等于 g[详细]
-
LWP中文FAQ -- 转自兰花仙子 from CU
所属栏目:[大数据] 日期:2020-12-16 热度:178
? http://bbs.chinaunix.net/thread-1805600-1-1.html LWP中 文FAQ 若有变动或补充仙子会即时更新 1. 如何快速GET一个页面? ??use LWP::Simple; ??my $doc = get 'http://www.example.com/'; 复制代码 2. 标准的HTTP请求过程? ??use LWP::UserAgent; ? ??m[详细]
-
Perl的Excel读写问题
所属栏目:[大数据] 日期:2020-12-16 热度:105
老有人问我 excel 中文乱码的问题, 我平时很少接触这一块, 每次都得从头研究, 现在把结论记录在这里,以做备忘。 读: use?strict; ? use?warnings; ? ? use?Spreadsheet::ParseExcel; ? use?MyExcelFormatter; ? ? my?$file?=? 'foo.xls' ; ? ? my?$fmt?[详细]
-
Perl脚本递归替换所有指定目录指定文件类型中的指定模式
所属栏目:[大数据] 日期:2020-12-16 热度:131
例如把dir1和dir2两个目录下的所有.c和.h文件下的abc()函数替换成def()函数。下面的脚本会把改动前的文件存为以.old为后缀的文件。 ? #!/usr/bin/perl use strict; use warnings; use File::Find; sub process_source_file { ?my $in_filename = $_[0]; ?my[详细]
-
perl正则表达式分隔符的选择
所属栏目:[大数据] 日期:2020-12-16 热度:79
一直以来使用//做为正则的分隔符,在配置url的时候很不方便,比如http://topic.csdn.net/t/20030923/18/2292095.html,要将里面的/都转义为/, 后来发现可以使用其他字符做分隔符, if($sql=~m{in}){ print "succ1n"; } %,(,!等都可以 但是 if($sql=~{i[详细]
-
perl监控目录变化
所属栏目:[大数据] 日期:2020-12-16 热度:191
File::ChangeNotify 试过windows可以,注意filter参数 cpan例子: use File :: ChangeNotify ; my $watcher = File :: ChangeNotify - instantiate_watcher ( directories = [ '/my/path' , '/my/other' ], filter = qr /.(?:pm|conf|yml)$/ , ); if ( my @[详细]
-
perl foreach
所属栏目:[大数据] 日期:2020-12-16 热度:116
找错: #!/usr/bin/perl use warnings; use strict; sub message{ ??my $quant = $_; #这里$_是个无效值,改成$quant=shift或$_[0] ??my $mess; ??$mess = "$quant glasses of Lemonade on the walln"; ??if ($quant eq 1){ ????$mess = s/glasses/glass/;#[详细]
