perl使用经验之五(引用)

XXXX项目perl使用经验之五(引用)

引用

目前项目不需要符号引用，尽量避免使用

 

变量的命名最好从名字上面区分出是不是引用，如普通标量命名为$name,引用变量命名为$name_ref

解引用的时候，引用变量尽量使用{}括起来,以便减少后续维护人员的麻烦
如
$a=1;
$a_ref=\$a;
print ${$a_ref};

如果引用列表或散列中的一个元素，应使用'->'符号
如
my %h = (
"hello" => 1,
"world" => 2,
);

my @a = (1,2,3,4,5,6);

my $h_ref = \%h;
print $h_ref->{"hello"};
my $a_ref-> = \@a;
print $a_ref->[3];

如果引用列表中的多个元素，则不能使用'->'符号，只能用解引用
my @a = (1,2,3,4,5,6);
my $a_ref-> = \@a;
print @{$a_ref}[1..3];