perl语言入门 书签 pdf?python?Perl语言入门教程(2)

还可以创建数组：

@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'
);

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

循环语句和If语句

您可以像在C语言中一样创建一个简单的for循环语句：

for (i = 0; i < 10; i++)

print i, "n";
Perl注释
即使是单行语句，也必须使用左右大括号，即和。

While语句很简单：

i = 0;
while ( i < 10 )

print i, "n";
i++;

If语句同样也很简单：

for (i = 0; i < 10; i++)

if (i != 5)

print i, "n";

布尔运算符的作用与C语言中的相同：

&& 表示“和”

|| 表示“或”

! 表示“非”

对于数字：

== 表示“等于”

!= 表示“不等于”

<、<=、> 和 >=（与原意相同）

其他：

eq

ne

lt

le

gt

ge

如果有一个数组，则您可以使用foreach语句轻松进行循环：

@a = ('dog', 'cat', 'eel');
foreach b (@a)

print b, "n";

Foreach语句可以获取@a数组中的每个元素，并将该元素置于b中，直到@a循环结束。

Perl函数

使用单词sub可以创建一个例行程序。将所有变量传递到例行程序中一个称为_的数组。因此，需要运行以下代码：

show ('cat', 'dog', 'eel');
sub show

for (i = 0; i <= #_; i++)

print _[i], "n";

请注意，#将返回数组的最高索引号（元素的编号减1），所以#_表示参数的编号减1。如果您喜欢这种运算，那么也会爱上PERL语言。

您可以使用单词local声明例行程序中的局部变量，例如：

sub xxx

local (a, b, c)
...

还可以使用&调用某个Perl函数，例如：

&show ('a', 'b', 'c');

只有在出现歧义时才需要使用&符号，但也有一些编程人员一直都使用该符号。

要从例行程序中返回一个值，需要使用关键词return。

Perl读取

从STDIN中读取数据

要从标准输入(stdin)中读取数据，需要使用STDIN来处理。例如：

print "Enter high number:";
i = ;
for (j = 0; j <= i; j++)

print j, "n";

只要输入一个整数，该程序就将会正常运行。 每次读取一行数据。您还可以使用getc读取一个字符，例如：

i = getc(STDIN);

或使用read语句：

read(STDIN, i, 1);

read命令的第三个参数中的1是要读取的输入数据的长度，。

读取环境变量

您可以使用PERL定义一个名为ENV的全局散列，它可用来检索环境变量的值。例如：

print ENV'PATH';

PERL注释
环境变量的名称必须使用大写字母。

读取命令行参数

您可以使用PERL定义一个全局数组ARGV，其中包含所有传递给脚本的命令行参数。#ARGV是传递的自变量的编号减1，ARGV[0]是第一个被传递的自变量，ARGV[1]是第二个被传递的自变量，依此类推。

现在，您应该能够阅读或编写简单的Perl脚本了。如果您乐于阅读整篇文档，会学到更多知识。有关其他信息，请查看下一页上的链接。

以上就是关于perl语言入门的全部内容，相信你一定会非常满意。

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-13394-2.html