基于Perl的地铁站台异常情况检测(4)
最重要的是，你不用先学习所有 Perl 的东西就可以开始写有用的程序。你可以写很小的 Perl 程序。你也可以像小孩那样写 Perl 程序，我们保证不会笑话你。或者更准确地说是，我们绝不会笑话小孩做事情的创造性。Perl 里的许多观点都是从自然语言中借来的，其中一条最好的观点就是只要你能把自己的意思表述清楚，那么你就可以使用这些语言的一个子集。Perl 文化可以接受任何熟练程度的成员。我们不会在你背后放个语言警察。如果你的老板不炒你，而且你的 Perl 脚本也能完成工作，那么它就是“正确”的。
尽管 Perl 很简单，但它仍然是一种特性很丰富的语言，如果你想用那些特性的话，那你就要学习一些东西。这也是把难题变简单的学费。虽然你要想把所有 Perl 能做的事情吸收还需要一些时间，但到你需要这些功能的时候你就会非常开心地发现 Perl 已经可以做这些事情了。
而且 Perl 并不仅仅只能黏合它自己的特性。Perl 是设计成可以用模块扩展的语言。你可以用 Perl 快速设计，编写，调试和部署 Perl 应用，并且你还可以在需要的时候很方便地扩展这些应用。你可以在其它语言里嵌入 Perl，而且你也可以在 Perl 里嵌入其它语言。通过模块输入机制，你可以把这些外部的扩展当作内置于 Perl 的特性。那些面向对象的外部库在 Perl 内部仍然保持面向对象的特征。
2.2 Perl语言的使用方法
2.2.1 Perl的特殊表达
由于Perl语言与其他语言不同，所以我列出一些特殊等式表达：
图2.2.1
所以Perl中的if语句应该如下表达：
if (name gt ‘fred ‘) {
print “’$name’ comes after ‘fred’ in sorted order.\n”;
} else {
Print “ ‘$name’ does not come after ‘fred’ .\n”;
Print “maybe it’s the same string, in fact .\n;
}
可选（执行）的程序块周围一定要加上表示块界限的花括号（这点和C语言不同）。最好和上面一样，将块里的程序代码向内缩排，这样程序读起来会方面许多。
2.2.2 Perl语句的书写方式
（1） 关于Perl的变量设定
Perl语言中的变量类型
Perl语言中的变量有以下五种：
标量，指针，数组，哈希表（hash）和句柄。
A Perl语言之标量
我们先来看看标量，标量是Perl语言中最简单的一种数据类型。这种数据类型的变量可以是数字，字符串，浮点数，不作严格的区分。在使用时在变量的名字前面加上一个“$”,表示是标量，相当于scalar中的第一个S。
使用以下格式进行定义：
$myfirst=123; #数字123
$mysecond="123";#字符串123
$mythird="$myfirst,$mysecond";#字符串123,123
$myforth='$myfirst,$mysecond';#字符串$myfirst,$mysecond
数字类型的标量可以使用0开头代表是8进制，用0x开头代表是16进制。例如：
$var1=017;#十进制的15
$var2=0xf;#十进制的15
还可以使用下面的格式：
$var3=123_456_7; #1234567
浮点数可以使用以下定义方式：
$var4=3.4;
$var5=4.3e+21;
$var6=234E345;
Perl中的字符串使用一个标量来表示，定义方式和c很像，但是在Perl里面字符串不是用0来表示结束的。而且使用双引号和单引号定义的字符串是不一样的。使用双引号定义的字符串里面出现的变量名会进行替换，而且可以出现“”等控制字符。而用单引号定义的就不可以了使用反斜杠引导的控制命令了（当然还可以使用反斜杠引道单引号和反斜杠），文本会按照字符串原来的样子保存。