perl的引用<1>

变量的赋值:在内存里存放值

?

引用:?存放的是其他变量的地址,地址会指向变量

?

引用变量的名字:?$ref

hello world[oracle@june2 1]$ cat 1.pl? {my $a = "hello world"; $ra = $a;}print $$ra; [oracle@june2 1]$ perl 1.pl? hello world[oracle@june2 1]$ $ra = $a 表示简单变量的引用 $$ra 表示取变量的值 [oracle@june2 1]$ cat 2.pl? print "1.引用的变量销毁,仍可引用n"; { ? ? my $ra; ? { my $a = "hello world"; ###创建引用变量 ? $ra = $a; } ##打印引用变量的值? ?print "1.ref=$$ra a=$an" } print "2.ref=$$ran"; [oracle@june2 1]$ perl 2.pl? 1.引用的变量销毁,仍可引用 1.ref=hello world a= 2.ref= 引用的使用: 使用简单变量:$$ref ?${$ref} 数组：@$ref @{$ref}; ? 元素：$$ref[0] ? ?$ref->[0]; 散列：%$ref ?%{$ref}; ?? 元素：$$ref{‘a’} $ref->{‘a’}; 函数：&$ref(a,b); ? $ref->(a,b)文件：$ref