perl连接字符串_Perl语言学习之标量（Scalar）

在Perl语言中，最容易学习的变量就是标量。如下例所示，

#!/usr/bin/perl
use warnings;
 $my_scalar_variable = "Hello,Sir!n";
print $my_scalar_variable;

第三行包含一个标量变量，其使用$符号在变量之前进行定义。

变量只存储单个数据元素,整数，浮点数，字符，字符串，段落等。

#!/usr/bin/perl
$age =20;             # 整数赋值
$name = "w3big";   #字符串
$salary = 130.50;     # 浮点数
print"Age = $agen";
print "Name = $namen";
print "Salary = $salaryn";

上述Perl代码输出：

Age = 20
Name = w3big
Salary = 130.5

Perl中有很多比较运算符可用于比较数字标量和字符串标量，其返回返回值为true或false。

数字标量比较运算符：

==      等于
！=    不等于
<    小于
>     大于
<=   小于或等于
> =  大于或等于
<=>   数值比较

字符串标量比较运算符：

eq  - 等于
ne  - 不等于
lt  - 小于
gt  - 大于
le  - 小于或等于
ge  - 大于或等于
cmp  - 字符串比较

标量运算

以下示例演示了一些简单的标量运算：

#!/usr/bin/perl
$str ="hello" . "world";      # 字符串连接
$num = 5 + 10;                  #两数相加
$mul = 4 * 5;                   #两数相乘
$mix = $str . $num;             #连接字符串和数字
print"str = $strn";
print "num = $numn";
print "mix = $mixn";

上述Perl代码输出：

str = helloworld
num = 15
mix = helloworld15

单双引号对标量变量的影响

双引号保留了转义序列的含义，如 n（换行）， t（Tap）等。另一方面，单引号中即无法实现转义功能，也无法打印$scalar。

如下例所示：

$name ="wonder"
print "Name: $namen";

打印：

Name: wonder

而

$name ="wonder"
print 'Name: $name';

打印：

Name "main :: name" used only once