perl 一贴-中国学网
与【perl 一贴】相关信息:
用户还关注
大类导航： |#!/usr/bin/perl -w
$_=&fred wilma&;
if(/(fred)*(wilma)/) #请问这里改成“if(/fred*wilma/)”就不能输出“yes”呢？两者有什么不同？
print &yes \n&;
谢谢！------解决方案--------------------fredfredfred和freddd的区别
------解决方案--------------------(fred)*(wilma)也能匹配sb wilam。正确的正则表达式应该是/fred\s+wilma/
------解决方案--------------------用小括号标志出量词的作用对象不用小括号就表示作用于一个字符。(fred)*
fredfredfred*
12345678910
12345678910
12345678910 上一篇：下一篇：文章评论相关解决方案 12345678910 Copyright & &&版权所有perl使用模块
Perl当中模块是一个非常重要的部分，使用好模块对于编写出简洁重用性好的pl脚本会有很大的帮助，看一个简单的例子：
& Testpm模块
#!/usr/bin/perl -w
package T #声明命名空间
use vars qw($VERSION @ISA @EXPORT);
require E #加载Exporter模块
@ISA = qw(Exporter); #继承Exporter
@EXPORT = qw (
); #缺省输出符号列表
$VERSION = ’0.01&;
sub PrintTest #待输出函数
print “test”;
1; #模块返回值
&使用Testpm模块的pl脚本
#!/usr/bin/perl -w
use lib ‘/tmp’; #将/tmp目录加载到@INC最前面
use T #加载Testpm模块
PrintT #调用PrintTest方法
先分析Testpm模块:
package Testpm：声明Testpm命名空间，一般该名称和pm文件名一样。
qw(Exporter)：让Testpm继承Exporter，用Exporter模块来将我们的函数从Testpm::namespace输出到
main::namespace，让使用Testpm的程序可以使用这些函数。 为了use strict，我们必须使用use
vars来声明一些变量。
@EXPORT：缺省输出符号列表。除了函数之外，其他变量也可以通过@EXPORT进行输出。如@EXPORT=qw(PrintTest
@names)，函数前可加&，也可以省略，如@EXPORT=qw(&PrintTest)。对于输出列表，也可以使用
@EXPORT_OK，二者的区别在于@EXPORT会输出缺省的所有符号列表，而不管在输入列表中是否提到这些符号。一般来说，你通过默认的使用
@EXPROT输出的越少越好。因为调用该模块的程序中，有可能存在与其中函数相之冲突的函数或者代码。@EXPORT_OK里的符号列表只有当程序在
use语句里面特别要求它们的时候才输出。如果使用@EXPORT_OK，则相应的代码修改如下：
& Testpm模块
@EXPORT_OK = qw (
use Testpm qw(PrintTest);
1：在使用use或者require加载模块时，会返回一个成功与否的布尔值，表示模块是否加载成功，这里的1就用来表示模块被成功加载。
再看pl脚本：
‘/tmp’：由于Testpm.pm文件放于/tmp目录，故使用这条命令将/tmp放入@INC数组最前面，这样在perl加载模块时就能找到正确的加载路径。
use Testpm：加载Testpm模块。
PrintTest：调用Testpm的PrintTest方法。
对perl模块的简单介绍就到此结束了，如果还想深究，可以看看&高级perl编程&。
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。Perl+习题答疑_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
Perl+习题答疑
上传于||文档简介
&&perl 的习题
阅读已结束，如果下载本文需要使用1下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩8页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢perl的文件输入与输出问题_百度知道
