Perl是什么?用Larry Wall自己的话说,Perl是借取了C、sed、awk、shell scripting以及很多其他程序语言的特性的一种语言。你可以说它是“实用报表提取语言”(Practical Extraction and Report Language),也可以叫它“病态折中垃圾列表器”(Pathologically Eclectic Rubbish Lister),Larry说:“OK,我都承认”。
最近机缘巧合,有幸接触了一把Perl,以及它的模板引擎Mason(我是这么理解的)。我用过Java、C#、C++等等传统高级语言,也研究过Groovy、JavaScript之类的动态语言,甚至自虐过VB(Don Box还说了一段很好玩的话,其中的“Dim me As VBProgrammer”流传甚广),我很懒,并不打算仔细研究Perl——有的东西我有兴趣一查到底,有的东西觉得点到即止,够用就好,于是只想粗略地把它过一遍,不过Perl还是立马给我留下了深刻印象。
Martin Fowler提出了两种API风格:最小接口和人本接口,前者简约、干净、独立,接口覆盖功能没有交集,而后者则提供了一大堆人性化的方法,方法之间互有冗余。Perl就像人本接口,用Perl爱好者们自己的话说,叫做“There's More Than One Way To Do It.”,虽然很多动态语言也提供了丰富的方法,但是Perl把这一点做到了极致。
事实上,我在几个月以前就已经写出了一些简单的perl脚本,但是它和Linux的亲和力让它非常好用。那个时候我还几乎不了解Perl,但是我就照着同事的一点Perl代码,加上我自己的理解,去完成了一个在Linux上用的小工具,Perl就是如此具有易上手的特性,连Google的时间都省了。
如果你就这样认为Perl是一个语法简单的语言,那就错了。Perl是一个可以写出极其简练代码的语言(这往往意味着也可以写出极其混乱的代码来,比如这个),但是功能上并不含糊(有一个很著名的Perl项目ppt,用纯perl实现了所有Unix下的常用命令)。另外,Perl大概是最好的对字符串进行处理的语言。
给以文件操作的例子,如果用Java,需要写:
BufferedReader br = null;
try {
br = new BufferedReader(new FileReader("test.txt"));
String line = br.readLine();
while (null != line) {
if (line.startsWith("http:"))
System.out.print(line);
line = br.readLine();
}
} catch (FileNotFoundException e) {
System.out.println("Can't open file:" + e.getMessage());
} catch (IOException e) {
e.printStackTrace();
} finally {
if (null != br) {
try {
br.close();
} catch (IOException e) {
e.printStackTrace();
}
}
}
如果用perl,只需要:
open(FILE, "test.txt") or die "Can't open file: $!\n";
while (<FILE>) {
chomp;
print if /^http:/;
}
谈到Perl不能不说其独有的诗歌文化,因为语言的包容性、丰富的表达方式和灵活性,让Perl可以写出诗歌一样的代码。比如这首名为《Black Perl》的Perl诗歌,更多的请到perlmonks去找:
BEFOREHAND: close door, each window & exit; wait until time.
open spellbook, study, read (scan, select, tell us);
write it, print the hex while each watches,
reverse its length, write again;
kill spiders, pop them, chop, split, kill them.
unlink arms, shift, wait & listen (listening, wait),
sort the flock (then, warn the "goats" & kill the "sheep");
kill them, dump qualms, shift moralities,
values aside, each one;
die sheep! die to reverse the system
you accept (reject, respect);
next step,
kill the next sacrifice, each sacrifice,
wait, redo ritual until "all the spirits are pleased";
do it ("as they say").
do it(*everyone***must***participate***in***forbidden**s*e*x*).
return last victim; package body;
exit crypt (time, times & "half a time") & close it,
select (quickly) & warn your next victim;
AFTERWORDS: tell nobody.
wait, wait until time;
wait until next year, next decade;
sleep, sleep, die yourself,
die at last
如果一门语言能给你带来对设计和编码很多新的理解和体验,那么,不妨尝试一下它。
--------------------------------------------------------------------------------------------------------------------------------
2012-5-23:
Perl有一个有名的框架是Mason,perl可以做很多事,脚本、胶水语言等等,Mason则是一个用perl来实现页面模板的好例子。建议对perl有兴趣的同学,关注一下它。另外,不妨再有对比地了解一下Embperl这个框架(它能够对HTML标签具备语义识别的能力,有些奇葩)。
文章系本人原创,转载请注明出处和作者
分享到:
相关推荐
Perl语言学习
学习perl非常好的资料
个人的perl学习笔记,供大家分享,看看吧,正在学习当中目前
适合Linux学习,Perl脚本开发基础学习,相信对你有帮助
超好perl学习教程超好perl学习教程超好perl学习教程超好perl学习教程超好perl学习教程
分享Perl_学习手札书籍,供大家学习、参考及交流perl。
perl学习手札,共同学习,共同进步。希望你能很快掌握perl。
perl脚本学习范例
perl脚本了解及学习,学会简单的perl脚本
perl学习资料,超好! 欢迎加入学习。。。
最经典的PERL学习文件,入门宝典,附加有精选练习题目
作为PERL5家族中的一员,PERL6表现出其独特性能。
perl学习笔记 介绍了perl学习的基础笔记,入门学习
用于学习perl软件.perl是一个强大的文档处理软件,几乎无所不能!
Perl学习手札.chmPerl学习手札.chmPerl学习手札.chm
详细介绍了变量、函数、文件操作等,非常经典,实用的perl教程,很形象!
学习perl的好帮手
perl学习文档,第四版的,大家有用的话,可以下载看看
包含: Perl语言入门(中文版 第六版).pdf Perl语言入门(中文版 第四版).pdf Perl编程语言.pdf Perl技术内幕.pdf Perl教程--Win32版.pdf Perl网络编程.pdf
Perl技术内幕源码 学习perl最好的资料 perl代码很难找到 本资源很给力