关于perl引用的总结

perl的引用类似于C语言的指针，

1 关于标量变量的引用：

$name = "zhang";

$ref = /$name;  #"/"增加此符号表示对标量$name的引用，即$ref指向$name。

print $ref;#打印出的值为地址

print $$ref; #打印出引用的值，为zhang.  增加的此$号表示引用的对象是个标量，而不是数组。

 

$another = $ref;  #引时$another又是$name的另外一个引用

$ref = "hello";#此时$fef为普通的标量，不再是$name的引用了。

 

2对数组的引用:

perl语言创建对数组的引用方法与标量变量类似，使用反斜杠来创建：

$aref = /@arr;   #此时$aref包含了对整个数组@arr的引用.

可以使用此引用$aref来访问@arr的各个部分：

$$aref[0]           #访问数组@arr的第一个元素,与${$aref}[0]同

@$aref[2,3]       #访问数组的一个片,与@{$aref}[2,3]同

@$aref               #访问整个数组,与@{$aref}相同

 

#用引用来访问数组例子

foreach( @{$aref} )

{

        print "$_/n";

}