?
Perl引用学习
- 一个引用就是创建一个硬链接,一个引用只有在对它的所有引用都消失之后才会被摧毁
-
创建的引用只是一个标量,对这个标量进行解引用意味着我们使用这个引用访问引用物
-
创建引用的方法:
-
反斜杠: 对任何命名变量,数值,匿名标量值,对一列表用反斜杠,会得到一组引用
-
匿名数组组合器,使用方括号创建一个指向匿名数组的引用
- 匿名散列组合器,使用花括号创建一个指向匿名散列的引用
-
匿名子过程组合器,通过不带子过程名字的sub创建一个匿名子过程
-
对象是一个赐过福的引用
-
过引用同名类型团来创建指向文件句柄或者目录句柄
- perl引用的高级技术
- 当编译器看到双引号字串里的 @{...} 的时候,它就会被当作一个返回一个引用的块分析
-
print "We need @{ [$n + 5] } widgets!/n";
-
用use strict 'refs';来拒绝符号引用
- 嵌套子过程
- Tie::RefHasn 可以将引用作为键值,其他的不行
-
循环引用导致内存释放有问题的
-
使用引用的方法:
-
把变量当做变量名来解析? ?$bar =?? $$scalarref;
?? push(@$arrayref,$filename);
?? $$arrarref[0]?? = "January";?????????????????? # 设置 @$arrayref 的第一个元素
?? @$arrayref[4..6]=qw/May June July/;?? # 设置若干个 @$arrayref 的元素
?? %$hashref = (KEY => "RING",BIRD => "SING");?? # 初始化整个散列
?? $$hashref{KEY} = "VALUE";???????????????????? # 设置一个键字/数值对
?? @$hashref{"KEY1","KEY2"} = {"VAL1","VAL2"};???????? # 再设置两对
?? &$coderef(1,2,3);
?? print $handleref "output/n"; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ${$hashref{KEY}} 和${$hashref}{KEY},$$hashref{KEY} ?区别,后个正确。
-
把一个block{}当做变量名来使用。 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?$bar = ${$scalarref};
?? push(@{$arrayref},$filename);
?? ${$arrayref}[0] = "January";
?? @{$arrayref}[4..6] = qw/May June July/;
?? ${$hashref}{"KEY"} = "VALUE";
?? @{$hashref}{"KEY","KEY2"} = ("VAL1","VAL2");
?? &{$coderef}(1,3);
-
使用箭头操作符。解引用的类型是由右操作数决定的,也就是,由直接跟在箭头后面的东西决定。如果箭头后面的东西是一个方括弧或者花括弧,那么左操作数就分别当作一个指向一个数组或者散列的引用,由右边的操作数做下标定位。如果箭头后面的东西是一个左圆括弧,那么左操作数就当作一个指向一个子过程的引用看待,然后用你在圆括弧右边提供的参数进行调用。
arrayref->[2]? = "Dorian";??????? #3
$hashref->{KEY} = "F#major";???????? #3
$coderef->(Presto => 192);????????? #3 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?在方括弧或花括弧之间,或者在一个闭方括弧或花括弧与圆括弧之间的箭头是可选的。后者表示间接的函数调用。 ?
?
?
?
试手程序如下:
?
?
运行结果如下:
D:/王连臣/学习记录/201102>"Perl Ref Show.PL"
访问第一个匿名散列:
ARRAY(0x3f4c28)
ARRAY(0x3f4c28)
htmlARRAY(0x3f4c28)jsARRAY(0x3f4e80)打印第一个匿名数组:
100200
打印第一个匿名数组的第二个元素:
200
200