数值和字符串

数值

perl中以双精度(浮点数)方式保存和运算数值的方式

就算写的是整数，在内部也会转换成等效的浮点数类型保存。

但在perl内部，有些运算会将浮点数转换成整型进行，而且也有integer编译器可以强制编译成整型。

perl中整数的表示方式

有3种方式：

这里使用下划线(_)代替逗号表示千分位，因为perl中逗号有特殊意义。

算术运算

+ - * / % **

**的优先级在这里最高。

取模时，先两个数取整，再取模。例如5.2 % 2.1等价于5 % 2。

多个取幂符号时，**的优先级是从右向左进行的。

3 ** 4 ** 2   # 3 ** (4 ** 2) = 3的16次方

单双引号和反引号

perl对待单双引号的方式和shell有点类似。

单引号内，只有反斜线的转义效果存在(如\n不再是换行)，其它全都当作字面符号(单引号自身除外)
双引号内，反斜线、反斜线序列(\n,\t...)、变量替换都允许
反引号内，内容会交给shell执行

'malong'

'malong\'s girl friend'

'malong\n'               # 这里没有换行

"malong\n"               # 换行了

'malong

girl friend'             # 换行了，因为这里的换行是字面符号，不是\n

'malong\\n'              # 换行了

"malong $var"            # 变量替换

有以下反斜线序列(转义序列)：

\n

\r

\t

\l    # 将下个字母转换为小写

\L    # 将后面的多个字母都转换为小写，直到遇到\E

\u    # 将下个字母转换为大写

\U    # 将后面的多个字母都转换为大写，直到遇到\E

\Q    # 和\E之间的所有字符都强制当作字面符号

\E    # \L、\U和\Q的结束符号

但即使没有"\E"，到了字符串结束的地方，转义序列就会结束。例如：

print "\Uabc"."xyz\n"    # 输出ABCxyz

print "abc"."x\Eyz\n"    # 输出abcxyz

反引号内的字符串会交给shell执行。这是和操作系统交互的一种方式，支持操作系统的管道、重定向等特性。另一种方式是使用system函数。

$mydatetime = `date +"%F %T"`

print $mydatetime,"\n";

默认情况下，反引号内的内容会被perl先按照双引号的方式进行解析，然后传递给操作系统的shell执行。所以，当有变量替换时会进行变量替换：

$name="malongshuai";

$msg=`echo $name`;   # 替换为echo malongshuai，然后交给shell

print $msg;

如果不想先被perl解析，可以使用qx和单引号结合的方式，关于qx，见下文。

$name="malongshuai";

$msg=qx'echo ha $name hei';   # 不会替换为malongshuai，而是将$name替换为空交给shell

print $msg;

引号的文本形式：q、qq和qx

q等价于单引号
qq等价于双引号
qx等价于反引号

q(hello world)        # 等价于'hello world'

qq(hello world)       # 等价于"hello world"

qx(echo hello world)  # 等价于`echo hello world`

上面的括号可以替换为其它符号，只要前后能配对(特指括号类)或者一致即可：

qq{ hello }

qq! hello !

qq# hello #

qq% hello %

字符串连接和重复

字符串连接使用点(.)。

下面是等价的：

abc.cde

abccde

字符串重复使用小写字母"x"，后跟一个重复倍数。如果倍数是一个小数，如3.2，则会取整。如果倍数小于1，则取整为0，所以倍数为0，返回空。

"abc" x 3

"abc" x 3.2

都将输出"abcabcabc"。

"abc" x 0.4  # 返回空

"x"符号左边会强制转换为字符串。

03 x 3      # 返回333

"03" x 3    # 返回030303

3 x 3       # 返回333

3.2 x 3     # 返回3.23.23.2