Perl中的引用

概述地址引用 1.  值 $first  = 1; $second = \$first;     #  表示地址引用 $first = 3; print $$second;       # 输出值为3, 必须使用$$才可以输出，print $second 输出为空 print $first;                2  数组 @l = (1,2,3); $rl = \@l; print   @

地址引用

1.  值

$first  = 1;

$second = \$first;     #  表示地址引用

$first = 3;

print $$second;       # 输出值为3,必须使用$$才可以输出，print $second 输出为空

print $first;               

2  数组

@l = (1,2,3);
$rl = \@l;
print   @$rl;    #输出123
print $rl->[2];  #数据第三个元素

print $l[2];       和上面的意思一样

$rl = [1,3];   指向你们的数组

3   Hash

%hash = (1,'fruit','desk');   #创建hash
print $hash{1};                #读取
$rh = \%hash;                #创建引用
print %$rh;                     #  调用，%$   = %hash 
print keys(%$rh);        #同上
print $rh->{1};              #读取key 1 对应的值
print %hash->{1};       #使用hash读取
print $hash->{1};        #错误

4.   获得引用的类型

$ms = [1,3,4];
print "ref type:".ref($ms);
print qq(\n);

返回值为Array.

其中的'.'为连接符，如

print "ref type:".ref($ms);
print qq(\n);

可以写为

print "ref type:".ref($ms)."\n";

总结

以上是内存溢出为你收集整理的Perl中的引用全部内容，希望文章能够帮你解决Perl中的引用所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。