perl语言入门——标量数据

数字：所有数字的你内部格式都相同，在perl内部，总是按"双精度浮点数"要求来保存
浮点数直接量：

    1.25
    255.000
    7.24e45
    -6.5e24
    -1.2E-23

整数直接量：

    0
    2001
    -40
    5683745793704

perl也允许在整数直接量里插入下划线，如56_837_645

非十进制的整数直接量：perl也允许使用十进制以外的其他进制来表示数字
    八进制直接量以0开头
    十六进制直接量以0x开头
    二进制直接量以0b开头

数字操作符：加法(+)减法(-)乘法(*)除法(/)取模(%)乘幂(**)

单引号内的字符串直接量：除单引号和反斜线字符外，单引号内所有字符都代表他们自己（包括换行字符）
要表示单引号或反斜线，需要在前面再加一个反斜线字符

双引号内的字符串直接量：和其他语言中的字符串差不多

字符串操作符：字符串可以用.操作符拼接起来
    如"hello".' '."world"等同于"hello world"
字符串重复操作符x
    如"barney"x(1+1)即等同于"barney"x2，为"barneybarney"
    注意5x4本质就是"5"x4,所以得到"5555"

数字与字符串之间的自动转换：通常perl会根据需要，自动在数字和字符串之间进行类型转换
这完全取决于操作符需要什么类型的操作数

Perl内建警告信息：命令行运行时使用-w选项，可以启动警告功能
    如想每次运行都启用警告，课使用#!行来指明#!/usr/bin/perl -w
    非Unix系统也可以写#!perl -w
    更高级的perl版本也可以通过启用编译命令 use warning打开警告功能
    编译命令use diagnostics可以看更详细的问题描述

标量变量：标量变量的名称以$开头，后面接着所谓的perl标识符，在perl里，标量变量名之前总有$
标量的赋值：

    $fred=17;
    $barney='hello';
    $barney=$fred+3;
双目赋值操作符：$fred+=5;等效于$fred=$fred+5;
    一个常见的双目赋值操作符是由字符串连接操作符.改造的追加操作符.=
    $str.=" ";在$str末尾追加一个空格

用print输出结果：print "The answer is ",6*7,".\n";

字符串中的标量变量内插：字符串内所有的标量变量名，都会被替换为该变量当前的值
    如果标量变量从来没有赋值过，就会以空字符串来代替
    如果要打印的就是这个变量，则不必使用变量内插的方式，print $fred;
    变量内插也称为双引号内插，因为它只会在双引号里起作用。
可以用反斜线对$进行转义
为了避免歧义，可以用{}将变量括起来
    如print "fred ate $n ${what}s.\n";
比较操作符：

    相等  ==  eq
    不等  !=  ne
    小于  <   lt
    大于  >   gt
    小于或等于  <= le
    大于或等于  >=  ge

if控制结构：if (condition) {...}

获取用户输入：<STDIN>
    如$line=<STDIN>;
    <STDIN>返回的字符串，一般在最后都跟有一个换行符

chomp操作符：用于去除字符串结尾的换行符
    chomp($text=<STDIN>);
其实chomp本质是函数，返回值是实际移除的字符数，显然是1或0
    如$food=<STDIN>; $betty=chomp $food; #会得到返回值1
如果字符串后面有两个以上的换行符，chomp只删除一个，如果没有，什么也不做，返回0

while控制结构：与C语言类似

undef值：在首次被赋值之前，变量的初始值就是undef（未定义）
    undef作为数字时会被视为0，作为字符串使用会被视为空字符串

defined函数：要判断某个字符串是undef而不是空字符串，可以使用defined函数，如果是undef，返回假