perl引用 声明方式 调用方式 解引用
一、声明，调用perl的引用，相当于c中的指针，有以下几种类型
1、一般的声明方式
$scalarref = \$foo; #标量引用 SCALAR ， $foo='hello';
$constref = \186_282.42;#标量引用 SCALAR
$arrayref = \@arr; #数组引用 ARRAY ， @arr=1..100;
$hashref = \%hash; #hash引用 HASH，%hash=('a'=>1,'b'=>2);
$coderef = \&add; #子过程引用 CODE，sub add{($a,$b)=@_; return $a+$b;}
$globref = \*STDOUT; #GLOB句柄引用
使用方式(以下的数组下标，键值假设都存在)：
$$scalarref ;
$$constref ;
$$arrayref ; 或 $arrayref ->;
$$hashref{'a'}; 或 $hashref->{'a'};
&$coderef(1,2) ; 或 $coderef->(1,2);
2、匿名的方式
另外声明方式采用匿名方式声明 如下（针对数组，hash，子过程）
$arrRef=; #指向匿名数组的引用
$hashRef={'a'=>1,'b'=>2}; #指向匿名hash的引用
$subRef=sub{return 1;}; #指向匿名子过程的引用
使用方式是一样的
3、符号表引用的声明方式
$scalarref = *foo{SCALAR}; # 和 \$foo 一样
$arrayref = *ARGV{ARRAY}; # 和 \@ARGV 一样
$hashref = *ENV{HASH}; # 和 \%ENV 一样
$coderef = *handler{CODE}; # 和 \&handler 一样
$globref = *foo{GLOB}; # 和 \*foo 一样
$ioref = *STDIN{IO}; # ？...
二、解引用
声明一个引用一般是在变量名前加个'\',而解引用是在变量名前加'$',真是有趣
如：
$s='hello';
$sRef=\$s;
print $$sRef; #输出 hello
理解了这点，看下面的
$refrefref = \\\"howdy";
print $$$$refrefref; #输出 howdy
页:
[1]