Perl学习笔记之Perl的引用
首先,应该明确所有的引用都是用标量来表示的.对于标量引用数组采用 $ref =[],对 标量引用散列采用 $ref={};
1 对数组的引用,采用\符号.
举例:(1)对变量的引用
my @lines=qw(a b c);
my $ref =\@lines;
print @{$ref}; #引用整个数组
print @{$ref}[0]; #引用单个元素 或者 $ref->[0];
举例:(2)直接引用
$ref = ["a","b","c"];
print @{$ref} #引用整个数组
print $ref->[0] #引用单个元素 或者 print @{$ref}[0];
2 对散列的引用
举例:(1)对变量的引用
my %lines=(a=>"A",b=>"B");
my $ref =\%lines;
print ${$ref}{"a"};#引用单个元素
举例:(2)直接引用
my $ref ={"a"=>"A","b"=>"B"};
print ${$ref}{"a"};#引用单个元素 或 print $ref->{"a"};
3 对标量的引用
举例:
$name="Whole";
$ref=\$ref;
print ${$ref}; //打印出标量$name的值
4 对方法的引用
举例:(1)对变量的引用
sub say {print "hello\n";}
$ref = \⊂
$ref->();//调用方法
举例:(2)直接引用
my $ref =sub {print "hello\n";}
$ref->();//调用方法