Perl学习笔记(1)

        总觉得还是一直要保持学习的渴望，虽然现在没有很迫切的需求，但还是觉得自己需要掌握一种脚本语言，于是选择了Perl。入门的书选择了小骆驼，进阶可以羊驼书（自行百度）。写的很有意思，例子很到位很清楚，适合新手入门。

        和任何一门编程语言一样，初级阶段从HelloWorld、变量、数组、控制、函数、IO和特有能力，七个方面来学习。由于我的第一个语言学的是C，所以多少会用C的逻辑来理解，见谅。

1.Hello Wrold :)

        Perl给人的感觉就是简单、方便、灵活，直接通过vi编写，交给perl程序解释，就ok了。而现在的Linux系统基本都自带perl。无需瞎折腾，很方便的第一个程序Hello：

#!/usr/bin/perl
print "Hello World\n";  #haha, my first perl~~

        敲完保存，给执行权限，运行。

        chmod 777 Hello

        ./Hello

        屏幕出现你想要的。程序第一句说明perl的路径，甚至可以加运行参数#!/usr/bin/perl -w等等；第二句输出；#后面跟注释，且只能单行注释。

2.变量

        Perl中的变量没有特定的类型，或者说只有一个类型。对于一个变量，可以理解为一个数字，也可以理解为字符，看你用在什么语境。后面会提到的数组也一样，他可以是一个变量（标量）或者一个数组，看你用在什么语境。有点意思。先说变量，术语一点叫标量。

        前面说过，一个标量可以是数字也可以是字符串，有一个特殊的标量叫undef。数字0或者字符串空不等同于undef，后面会看到undef的厉害。

        首先是声明，随用随声，无论声明还是使用总加$:（随便来，当然注意代码风格，不能数字开头）

$var = "123";
$haha;
$haha = $var;
$123_I_am_not_var;

        变量当做数字时，Perl总是将其处理成double型（这里我马上有个问题，double不能准确表示整数，那么Perl中判断整数相等怎么办，再一想我笑了），当然你可以写整数、浮点、科学计数（e-32），甚至二进制（0b），八进制（0开头），十六进制（0x）。Perl算出数值后总存成double。

        变量当字符串时，用单引号括起只能转义单引号（如\'）和反斜线（如\\），用双引号括起可以转义其他制表符、换行符、甚至内插新变量等等。（引号只是程序员读起来是字符串，但程序并不这么认为，如果不要转义你完全可以不要引号）

        那么怎么区别呢？取决于操作符需要什么的类型，那么会根据需要自动转换。如果是“+”、“-”、“*”、“/”、”**“、"==、!=、<、>、<=、>=”则当做数字处理，如果是“.”、“x”、"eq、ne、lt、gt、le、ge”则当做字符串处理。两类运算符均可以使用双目赋值操作。

$a = "17" * 3;    #51，
$a = "17". "2"；  #172，当然你可以不要引号写成$a = 17 . 2;注意中间的空格。但总觉得这样写怪怪的。
$a = "17" x "2";  #1717
$a = "17abd4" * 3 #51，忽略第一个非数字后面的字符
$b = "as${a}as";  #as51as
$a = "hello";     #hello
$a .= "world";    #helloworld
35 == 35.0 #true
35 eq 35.0 #false

        至于优先级，我从来不记，实在忘了，搞个小程序吧。上面的程序风格不好，只是想说要不要引号一样，我写的很随便。

        好了，第一发先搞到这，下一次总结数组。