Perl

title: 历史.
title: 早期版本.
content: 拉里·沃尔在1987年开始写作Perl,那时他正在Unisys当程序员,并且在1987年12月18日把1.0版本发布到了comp.sources.misc新闻组。这个语言在接下来的几年内很快地发展起来。  Perl 2,于1988年发布,特色是有一个更好的正则表达式引擎,Perl 3,于1989年发布,添加了对二进制数据流的支持。  从前,Perl唯一的文档是一个逐渐变长的手册页。在1991年,《Programming Perl》(被许多Perl程序员因封面称为“骆驼书”),出版了,而且变成了一个真正的Perl语言的参考资料。同时,Perl版本号变成了4,不是因为这个语言的重大改变,而是因为这本书的特殊意义。
title: 早期的Perl 5.
content: Perl 4的一系列维护的版本,最后一版是1993年的Perl 4.036。那时,沃尔废弃了Perl 4,开始开发Perl 5。Perl 5的最初始设计持续到了1994年。《"perl5-porters"》邮件列表于1994年5月为了共同移植Perl 5而建立。这将主要的论坛留给了Perl 5的开发,维护,和移植。  Perl 5.000于1994年10月17日发布。这是一个几乎完全重写了的解释器,而且它给这个语言添加了很多新的特性,包括对象,引用,局部变量,和模块。很重要地,模块提供了一个不用修改直译器就可以扩展语言的方法。这使得核心的直译器非常稳定,即使它允许一般的Perl程序员添加新的语言特性。从此,Perl 5的开发就活跃起来了。  Perl 5.001于1995年3月13日发布。Perl 5.002于1996年2月29日发布,带有参数类型的特性。这允许模块的作者写出像Perl内部命令那样智能的子程序。Perl 5.003于1996年6月25日作为一个安全更新的版本发布。  Perl 5历史中最重要的事件之一是支持了模块。在1995年10月26日,CPAN,一个发布Perl模块的网站,建立了;截至2015年11月,它已经有超过12457个作者写的157794多个模块了。  Perl 5.004于1997年5月15日发布,添加了UNIVERSAL包,这给了Perl一个所有的类的基础和要求使用模块的特定版本的能力。另一个重要的开发是包括了CGI.pm模块,有助于Perl发展为一个CGI脚本语言。  Perl现在也支持在Microsoft Windows和其它一些操作系统下运作。  Perl 5.005于1998年7月22日发布。这个版本包括了一个更好的正则引擎,一个编译系统(通过codice_1模块),codice_2正则引用操作符,一个基础模块的选集,并且又支持了一些其它的操作系统,包括BeOS。
title: 2000年至今.
content: Perl 5.6于2000年3月22日发布。大的修改包括64位支持,Unicode字串支持,大文件支持(即:超过2GiB的文件)以及“our”关键字。在开发Perl 5.6的时候,开发组决定把版本名称作成类似其它开源项目的;在5.005_63版之后,下一个版本变成了5.5.640,计划是开发版本用奇数,稳定版本用偶数。  2000年时,拉里·沃尔询问社区对Perl新版本的建议。这个进程的结果在361 RFC(评论请求)文件里(这个文件可以指导Perl 6的开发)。2001年,工作开始于设计Perl 6,一系列的文件概述了新一代Perl里的改变和设计。它们是作为一期RFC被展示的,而不是一个正式文档。这时,Perl 6的存在还只是一门语言的概述。  Perl 5.8最初于2002年7月18日发布,从此,每年才有一次更新。Perl 5.8的最后一版是5.8.9,发布于2008年12月14日。Perl 5.8改进了Unicode支持,添加了一个新的IO处理机制和新的多线程处理,提高了数字精度,添加了一些新模块。  2004年,工作开始于提要——原来的建议文件,但后来变成了Perl 6语言的详述。2005年2月,唐凤,开始开发Pugs,一个用Haskell写的Perl 6直译器。这是最初的一个Perl 6实现。这个努力停止于2006年。  2007年12月18日,Perl 1.0的20周年纪念日,Perl 5.10.0发布了。Perl 5.10.0包括了显著的新特性,这拉近了Perl 5和6之间的距离。这些特性包括一个switch语句(叫做“given/when”),正则表达式的更新和智能匹配操作符“~~”。同时,另一个Perl 6的实现,Rakudo Perl的开发开始了,一起使用Parrot虚拟机开发。从2009年11月开始,Rakudo Perl已经是每月一更新,现在已经是Perl 6的最完整的一个实现了。  Perl 5开发过程中的一次大修改在Perl 5.11;开发社区使用了每月更新的形式,这样就可以提前预知3个月以内的发布日期。  2010年4月12日,Perl 5.12.0发布了。显著的提升包括新的codice_3语法,Yada Yada操作符(有意地用占位符标记没有实现的代码),默认codice_4(在codice_5时)完整的Y2038编译,正则转化重载,DTrace支持,和Unicode5.2。Perl 5.12.3于2011年1月21日发布;它包括了新版的模块和一些文档的改变。版本5.12.4于2011年6月20日发布。  Perl 5.14发布于2011年5月14日。这个分支的最后一版,5.14.2,发布于2011年9月26日。  Perl 5.16发布于2012年5月20日。显著的新特性包括可以指定一个perl的版本来模拟,这允许用户更新perl的版本,但可以运行可能会不兼容的老脚本。Perl 5.16也更新了核心部分来支持Unicode 6.1。
title: 名称.
content: Perl原名叫“Pearl”。拉里·沃尔想给这个语言起一个有正面意思的短的名字;他考虑了(并且否定了)字典里每一个3—4个字母的词。他也考虑用他的妻子Gloria的名字命名。沃尔在Perl官方发布之前发现了现有的PEARL语言,并且改变了这个名字。  当指代这个语言的时候,名字通常是大写的(Perl),就像专有名词一样。当指代这个直译器本身的时候,这个名字通常是小写的(perl),因为大部分类Unix文件系统都是区分大小写的。在《Programming Perl》的第一版发布之前,用perl指代这个语言也很普遍;Randal L. Schwartz排版时将这个语言的名字在书中写成大写的以便理解。后来,这个大小写的区别就成为正规的了。  全大写的“PERL”是有争议的,而文档中说明“PERL”是不对的,一些核心的社区成员将其视为外行的标志。这个名字偶尔会被视为“Practical Extraction and Report Language”的缩写,就像文档顶端和一些纸质书本说的那样。一些全称被建议作为正式名称,包括沃尔自己的幽默的“Pathologically Eclectic Rubbish Lister”。的确,沃尔要求这个名字启示许多不同的扩展。
title: 骆驼标志.
content: 《"Programming Perl"》,由奥莱理媒体发布,特色是封面有一张骆驼的图片,因而被称作“骆驼书”。这张骆驼的图片已经成为了Perl非官方的标志和一个黑客的标志,这出现在T恤衫和其它衣服上。  欧莱礼拥有此图像之商标,并且宣称,唯有在捍卫「符号之完整性」时,才会行使其法律上的权力。欧莱礼允许此商标在非商业目的之前提下被使用,并同时供了Programming Republic of Perl的图像以及Powered by Perl的按钮图。Perl的另一个识别符号是羊驼。因为《Intermediate Perl》一书的封面是一只羊驼。
title: 洋葱标志.
content: Perl基金会拥有一个可选的标志,一个洋葱,允许它的子站点,Perl Mongers,PerlMonks,Perl.org和其它网站使用。
title: Perl简介.
title: Perl语言的中心思想.
content: Perl语言的中心思想可以集成为一句话「TMTOWTDI」:  Perl的作者拉里·沃尔建议可以把这个缩写词念成「Tim Toady」。这句话后来被扩充成: 另一个Perl程序员常常想起的Perl俗语是:
title: 优点.
content: 为了实现这样的目标,并且又因为Larry Wall本人也是一个语言学家,他设计Perl语言时使用了很多语言学的思维。相比C、Pascal这样的“高级”语言而言,Perl语言直接提供泛型变量、动态数组、Hash表等更加便捷的编程元素。Perl具有动态语言的强大灵活的特性,并且还从C/C++、Basic、Pascal等语言中分别借鉴了语法规则,从而提供了许多冗余语法。使得程序员可以忽略计算机内部资料存储、类型、处理方法、运算规则、甚至内存越界等等的细节,而将思考中心放在所需要的程序逻辑上。就这一点而言,很多Perl程序员认为目前只有Perl、Python等泛型语言才能称为“高级”语言,而C、Pascal甚至C++这些只能称为“中高级”语言而已。可以说,在统一变量类型和掩盖运算细节方面,Perl做得比Python更为出色。  由于从其他语言大量借鉴了语法,使得从其他编程语言转到Perl语言的程序员可以迅速上手写程序并完成任务,这使得Perl语言是一门容易用的语言。
title: 缺点.
content: 也正是因为Perl的灵活性和“过度”的冗余语法,也因此获得了仅写(write-only)的“美誉”,因为Perl程序可以写得很随意(例如,变量不经声明就可以直接使用),但是可能少写一些字母就会得到意想不到的结果(而不报错),许多Perl程序的代码令人难以阅读,实现相同功能的程序代码长度可以相差十倍百倍,这就令程序的维护者(甚至是编写者)难以维护。  同样的,因为Perl这样随意的特点,可能会导致一些Perl程序员遗忘语法,以至于不得不经常查看Perl手册。对此,《Learning Perl》一书里建议经常使用Perl编程。  建议的解决方法是在程序里使用codice_4以及codice_7,并统一代码风格,使用库,而不是自己使用「硬编码」。Perl同样可以将代码书写得像Python或Ruby等语言一样优雅。
title: Perl的语法.
title: Perl的Hello World程序.
content: 下面是一个在标准输出设备上输出Hello World的简单程序,这种程序通常作为开始学习程序语言的第一个范例:  print "Hello, world!\n"; 如果有perl 5.10以上的版本,也可以这样:  use 5.010; say "Hello, world!"; 这个程序将输出一行字符串:“Hello, world!”,以及一个换行。
title: 变量.
content: Perl是一种无类型语言(untyped),换句话说,在语言层面上,Perl和大多数编程语言不同,不把变量分成整数、字符、浮点数等等,而只有一种能接受各种类型数据的“无类型”变量。Perl的变量以$字符开头。例如$a=5;$b="Hello";$c=3.2;$d='\n这里并不换行'都是合法的Perl语句。  Perl中各种变量的运算也很自由,数和含有数的字符串是等效的,可以把数字字符串参与数学计算,也可以反之,让数字参与字符串的构成和操作。  除单个变量(Perl称为标量「Scalar」)之外,Perl还有两种集合类型,分别是数组(Array,用@字符开头)和关联数组(Associative array,或者称为Hash,用%开头。类似C++11的STL 无序表「unordered_map」和Python的字典「Dictionary」)。数组可以内含任意可变数目的变量,并以其存储顺序作为索引以完成常数时间的定位;而Hash表,则可以在变量之间建立一一映射,就像字典一样,把不同的变量按照他们的逻辑关系组织起来,并以作为“键”的变量进行索引,完成常数时间的定位。  另外,Perl还有一种特殊的类型,引用(reference),类似于指针,当作标量处理,可以指向标量(含引用)、数组、Hash等任何类型。如:  $foo = \$bar; print $$foo; $foo = \@bar; print @$foo; $foo = \%bar; print %$foo; $foo = \&bar; print $foo->(); print &$foo;  引用的好处在于,将它传递给函数之后,函数可以修改它指向的变量。而如果传递普通变量,修改的值只在函数内有效。  sub foo my $foo = '2'; my $var = \$foo; print $$var; foo ($var); print $foo;  输出“21”,即foo()内改变了$foo。
title: 判断语句.
content: 因为Perl大量的创造冗余的语法,并且从其他语言中大量的借鉴语法,使得Perl的语法极其丰富和灵活。Perl共有下列几种判断语句:  if ($hour > 22) {  print "hello" if $guest >= 1;  unless ($credit > 100) {  print "eat\n" unless $food == 0;  use 5.010; given ($foo)  由于逻辑算子的作用,还可以写出不用关键字if或unless的判断语句,如常用的打开文件语句:  open DATA, '<', $filename or die "Can't open $filename: $!\n";
title: 循环语句.
content: Perl中的循环语句也是非常的丰富。主要有:  Perl自己的for或者foreach循环(两个完全一样):  @group = 1.. 10; for (@group) { print "$_\n" for @group; foreach (@group) {  从C语言借鉴来的for循环(又可写作foreach,两个完全一样):  for ($i = 0; $i < 10; $i++) {  while循环:  $i=0; while ($i < 10) {  do...while循环:  $i = 0; do { } while ($i < 10); until循环:  $i = 0; until ($i == 10) {  从PASCAL语言借鉴来的do...until循环:  $i = 0; do { } until ($i == 10); 甚至还有利用动态语言特性,用map函数也可以做循环:  map { print "$_\n" } @group; 其实还有其他的循环方式。总而言之,就是TMTOWTDI。
title: Perl的应用.
content: Perl主要应用在Unix平台和网页中(PHP,CGI)。Perl拥有海量的模块支持,在解决问题时非常方便。CPAN有很多Perl模块。
title: Perl Data Language.
content: Perl Data Language(简称PDL)是Perl的一个外接模块,也是对Perl功能的一个重要拓展。它使得Perl语言可以直接对2至多维的矩阵直接操作,进行快速的矩阵运算,完成基础的Perl所不能完成的运算,大大拓展了Perl的适用范围。所以PDL本身也是很多其他模块的基础。  而且PDL提供了与很多其他软件包的接口,例如FFTW(一个快速傅立叶变换的软件包),又或者是Mesa(Linux上的OpenGL三维图形渲染包),这些包原来往往仅提供C/C++语言接口。这一功能使PDL成为拓展Perl功能的一个中间层。
title: Perl的社区文化.
title: Perl诗经.
content: 和C语言一样,在Perl界,难以读懂的程序码大赛是个有名的活动。近似难以读懂的程序码,但方向不同,Perl Poetry是可以被perl编译的诗。新的诗经通常会在Perl Monks网站发表。
title: JAPH.
content: Just another Perl hacker(另一个Perl黑客)是一个和国际C语言混乱代码大赛有着相同精神的社区文化。Perl程序员通过写JAPH代码,来分享自己的编程技术。
title: 竞争对手.
content: 因为许多Perl程序的代码难以阅读,加上它的面向对象功能被视为不是真正的面向对象(只是模组的模拟),于是很多人拿Perl和其他动态语言来比较。  最常见的比较对象是Python,有人写了篇文章叫What's wrong with Perl,指出Perl的缺点,鼓励别人学Python。著名黑客埃里克·斯蒂芬·雷蒙写Why Python?,该文中一个重要的比较对象就是Perl。A Byte Of Python里的Why Not Perl? 也把Python和Perl比较。  Ruby的作者(松本行弘,Matz)甚至直认他想Ruby作为Perl的后继者。
title: Perl 6.
content: Perl 6正在开发中,它将会与现在的Perl 5版本有很大不同。在Perl的官网介绍中,Perl 6不是Perl 5的下一个版本,而是与Perl 5平行的另一种编程语言。 其中最主要的改变是,Perl 6更好地支持面向对象,有专用于定义类的语法: class Foo is Universal { # inherit form Universal  可以明确定义变量类型,当类型不匹配,编译时报错。  另外,Perl 6提供了不同的正则语法,新的语法称作「规则」,并且允许使用者在正则中加入空格等以便阅读,也可以命名一个正则方便调用。  Perl 6中的控制流程和循环的判断条件的括号是可选的,如:  if $percent > 100 { for 1..3 { for 1..3 -> $x { while $stuff.is_wrong {  但是如果加入括号,不能紧跟在关键字后边,而要空一格,因为像foo()这样的形式,会调用函数,而不管它是不是关键字:  if ($hour > 22) { #正确 if($hour > 22) { #错误

Summary: Perl是高阶、通用、直译式、动态的程序语言家族。最初设计者拉里·沃尔为了让在UNIX上进行报表处理的工作变得更方便,决定开发一个通用的脚本语言,而在1987年12月18日发表。目前,Perl语言家族包含两个分支Perl 5以及Perl 6。虽然Perl不是正式的首字母缩略词,但仍有各种各样的逆向首字母缩略词,包括“实用的提取和报告语言”。

Perl: Perl is a family of two high-level, general-purpose, interpreted, dynamic programming languages. "Perl" refers to Perl 5, but from 2000 to 2019 it also referred to its redesigned "sister language", Perl 6, before the latter's name was officially changed to Raku in October 2019.