教你Perl语言入门

要启用Perl，您需要有Perl解释程序。在任何装有UNIX的计算机上，99.99%的都已安装了Perl解释程序。在装有Windows或Mac计算机上，您需要下载最新的语言版本并将其安装到计算机上。您可从网上轻松下载Perl，并且是免费的。

接下来，请确保查看Perl附带的DOCS目录，其中会有类似用户手册的资料。从某种意义上说，读完所有文档，或只是先浏览一下都会很有帮助。最初会觉得很麻烦，但在读完本文后，您将获得更多的认识。

如果您已加载了Perl，请确保已正确设置了路径以包含Perl的可执行文件。然后，打开文本编辑器并创建一个文本文件。在文件中，输入以下行：

 print "Hello World!n";

将文件命名为“test1.pl”。在命令提示符下键入：

 perl test1.pl

Perl将运行并执行文本文件中的代码。您应该会看到词语“Hello World!”打印到标准输出中。正如您所看到的，在Perl中创建和运行程序都非常简单。（如果使用的是UNIX，您可以在第一行中输入一段注释，如#!/usr/bin/perl，那么以后您就不需要在命令行键入单词“perl”了。）

print命令会将内容打印到标准输出中。符号n是换行符。如果您将测试程序修改成以下形式会更清楚（#表示一段注释）：

 # Print on two lines  print "HellonWorld!n";

请注意，打印命令知道它应该将“n”解释为换行符而不是文字字符这并不是由于打印命令拥有智能，而是因为使用了双引号（在Perl中实际称为引用）。如果您用单引号代替双引号，例如：

 print 'HellonWorld!n';

则不会对字符n进行解释，而是用文字代替。

还有反引号字符：`。一对反引号表示引号内的字符应被识别为一个操作系统命令，并且该命令与您输入的命令一并执行。如果您试图将操作系统的命令行操作置于反引号内，则将执行该命令。例如，在Windows NT系统中，您可以使用：

 print `cmd /c dir`;

来运行DIR命令，并可以从当前目录中查看文件列表。

符/用于引用正则表达式。

打印命令会将逗号解释为分隔符。例如：

 print 'hello', "n", 'world!';

句号也起分隔符作用：

 print 'hello'. "n".'world!';

句号实际上是字符串连接分隔符。

还会有用于C语言体系的运算符printf。

四、Perl变量

Perl语言中的变量非常有趣。Perl变量无需声明，用$来指明即可。例如：

 $s = "HellonWorldn"; $t = 'HellonWorldn'; print $s, "n", $t;

或：

 $i = 5; $j = $i + 5; print $i, "t", $i + 1, "t",  $j;     # t = tab

或：

 $a = "Hello "; $b = "Worldn"; $c = $a .$b;    # note use of . to concat strings  print $c;

由于.表示字符串连接，因此可以估计 .= 与 C 语言中的“+=”具有相同的含义。所以，你可以写成：

 $a = "Hello "; $b = "Worldn"; $a .= $b; print $a;

还可以创建数组：

 @a = ('cat', 'dog', 'eel'); print @a, "n"; print $#a, "n";  # The value of the highest index, zero based print $a[0], "n"; print $a[0], $a[1], $a[2], "n";

符号$#表示获得数组中的最高索引，它等于数组中元素的编号减1。像在C语言中一样，所有数组的索引都是从零开始的。

您也可以创建散列：

 %h = ('dog', 'bark', 'cat', 'meow', 'eel', 'zap'); print "The dog says ", $h{'dog'};

该散列中，单词'bark'和'dog'相关联，'meow'和'cat'相关联，等等。这个散列还可以表达的更具艺术性：

 %h = (    dog => 'bark',    cat => 'meow',    eel => 'zap' );

运算符=>引用左边的字符串，相当于一个逗号。