Perl 教程 之 Perl 引用 2

Perl 引用

引用就是指针，Perl 引用是一个标量类型可以指向变量、数组、哈希表（也叫关联数组）甚至子程序，可以应用在程序的任何地方。

取消引用

取消引用可以根据不同的类型使用 $, @ 或 % 来取消，实例如下：

实例

!/usr/bin/perl

$var = 10;

$r 引用 $var 标量

$r = \$var;

输出本地存储的 $r 的变量值

print "$var 为 : ", $$r, "\n";

@var = (1, 2, 3);

$r 引用 @var 数组

$r = \@var;

输出本地存储的 $r 的变量值

print "@var 为: ", @$r, "\n";

%var = ('key1' => 10, 'key2' => 20);

$r 引用 %var 哈希

$r = \%var;

输出本地存储的 $r 的变量值

print "\%var 为 : ", %$r, "\n";

执行以上实例执行结果为：

10 为 : 10
1 2 3 为: 123
\%var 为 : key110key220