我们可以在程序中使用 use strict 语句让所有变量需要强制声明类型。等号左边为变量,右边为值,实例如下:
$age = 25; # 整型
$name = "runoob"; # 字符串
$salary = 1445.50; # 浮点数
以上代码中 25, "runoob" 和 1445.50 分别赋值给 $age, $name 和 $salary 变量。
接下来我们会看到数组和哈希的使用。
标量变量
标量是一个单一的数据单元。
数据可以是整数,浮点数,字符,字符串,段落等。简单的说它可以是任何东西。以下是标量的简单应用:
实例
#!/usr/bin/perl
$age = 25; # 整型
$name = "runoob"; # 字符串
$salary = 1445.50; # 浮点数
print "Age = $agen";
print "Name = $namen";
print "Salary = $salaryn";
以上程序执行输出结果为:
Age = 25
Name = runoob
Salary = 1445.5
数组变量
数组是用于存储一个有序的标量值的变量。
数组 @ 开始。
要访问数组的变量,可以使用美元符号($)+变量名,并指定下标来访问,实例如下所示:
实例
#!/usr/bin/perl
@ages = (25, 30, 40);
@names = ("google", "runoob", "taobao");
print "$ages[0] = $ages[0]n";
print "$ages[1] = $ages[1]n";
print "$ages[2] = $ages[2]n";
print "$names[0] = $names[0]n";
print "$names[1] = $names[1]n";
print "$names[2] = $names[2]n";
以上程序执行输出结果为:
$ages[0] = 25
$ages[1] = 30
$ages[2] = 40
$names[0] = google
$names[1] = runoob
$names[2] = taobao
程序中我们在 $ 标记前使用了转义字符 () ,这样才能输出字符 $。
哈希变量
哈希是一个 key/value 对的集合。
哈希 % 开始。
如果要访问哈希值,可以使用 $ + {key} 格式来访问:
实例
#!/usr/bin/perl
%data = ('google', 45, 'runoob', 30, 'taobao', 40);
print "$data{'google'} = $data{'google'}n";
print "$data{'runoob'} = $data{'runoob'}n";
print "$data{'taobao'} = $data{'taobao'}n";
以上程序执行输出结果为:
$data{'google'} = 45
$data{'runoob'} = 30
$data{'taobao'} = 40
变量上下文
所谓上下文:指的是表达式所在的位置。
上下文是由等号左边的变量类型决定的,等号左边是标量,则是标量上下文,等号左边是列表,则是列表上下文。
Perl 解释器会根据上下文来决定变量的类型。实例如下:
实例
#!/usr/bin/perl
@names = ('google', 'runoob', 'taobao');
@copy = @names; # 复制数组
$size = @names; # 数组赋值给标量,返回数组元素个数
print "名字为 : @copyn";
print "名字数为 : $sizen";
以上程序执行输出结果为:
名字为 : google runoob taobao
名字数为 : 3
代码中 @names 是一个数组,它应用在了两个不同的上下文中。第一个将其复制给另外一个数组,所以它输出了数组的所有元素。第二个我们将数组赋值给一个标量,它返回了数组的元素个数。
以下列出了多种不同的上下文:
序号 | 上下文及描述 |
---|---|
1 | 标量 − 赋值给一个标量变量,在标量上下文的右侧计算 |
2 | 列表 − 赋值给一个数组或哈希,在列表上下文的右侧计算。 |
3 | 布尔 − 布尔上下文是一个简单的表达式计算,查看是否为 true 或 false。 |
4 | Void − 这种上下文不需要关系返回什么值,一般不需要返回值。 |
5 | 插值 − 这种上下文只发生在引号内。 |