perl学习笔记（一）标量数据

---

前言

本文主要记录perl学习过程中的标量数据。

---

1 标量数据

perl中的标量数据包括数字和字符串。不管是数字还是字符串，都可以存储在$符号开头的变量中。

1.1 数字

perl中支持小数、整数、十六进制数、八进制数、二进制数、以及数字操作符(加+、减-、乘*、除/、取模%、乘方**)

$a = 10;   #整数
$b = 1.1;  #小数
$c = 0xFF; #十六进制数
$d = 020;  #八进制数
$e = 0b10110;#二进制数

1.2 字符串

1.2.1 单引号字符串

$a = 'hello perl';

1.2.2 双引号字符串

$a = "hello perl";

1.2.3 单引号字符串和双引号字符串的区别

双引号字符串中有特殊的转义字符，单引号字符串中没有。

\n     \r
\t		\b
\a		\f

1.2.4 字符串连接操作符 .

$a = "hello" . " " . "perl"; # $a = "hello perl"

1.2.5 字符串被乘操作符 x

$a = "=" x 5;  # $a = "====="  5个等号

1.2.6 双引号字符串变量内插

$a = 1;
print "变量a的值是 $a \n"  #变量内插只能是双引号字符串

1.3 标量数据相关操作

1.3.1 比较操作

数字     ==		!=		<		>		<=		>=
字符串   eq		ne		lt		gt		le		ge

1.3.2 删除字符串末尾的换行符chomp

$a = "hello perl\n";
$b = chomp($a); #字符串末尾有换行则删除，没有就什么不干，一次删除一个换行符

1.3.3 获取用户输入

print "请输入你的名字"
$name = <STDIN>;
$name = chomp($name);

1.3.4 if控制结构

if($a > $b){
	print "$a大于$b"
}else{
	print "$a小于$b"
}

1.3.5 while控制结构

$count = 0
while($count < 10){
	print "count = $count\n"
	$count ++;
}

1.3.6 undef未定义

数字操作则将其转换成0，字符串操作则将其转换成空字符串，打印则什么也不显示。

1.3.7 defined函数

print "请输入你的名字"
$name = <STDIN>;
$name = chomp($name);
if(defined($name)){
	print "你的名字是：$name\n"
}else{
	print "没有输入！"
}

---

总结