请问->的用法？

devel

请大家指教，最后能有点简单的例子。。

BBDD

1、如果
$array = [1, 2, 3, 4];
那么@{$array} 就等于(1, 2, 3, 4)。
${$array}[3]就等于4。
但是${$array}[3]难读又难写，所以就用$array->[3]代替。

devel

谢谢！！能用在关联数组上吗？

BBDD

2、如果
@array = ([1, 2, 3], [4, 5, 6], [7, 8, 9]);
那么@{$array[1]}就等于(4, 5, 6)，$array[1]->[2]就等于6。
perl规定你可以省略两个方括号之间的->，所以$array[1]->[2]可以简写为$array[1][2]。

BBDD

谢谢！！能用在关联数组上吗？

当然可以。
3、如果
$hashr = { 'black' => '黑', 'white' => '白'};

那么 $hashr->{'black'} 就等于'黑'。

devel

thank

KornLee

最初由 BBDD 发表
1、如果
$array = [1, 2, 3, 4];
那么@{$array} 就等于(1, 2, 3, 4)。
${$array}[3]就等于4。
但是${$array}[3]难读又难写，所以就用$array->[3]代替。

->在perl里是个"指向符",这个我知道一点不过:
如果:
$array = [1, 2, 3, 4];
那么:
print $array应该是什么?:ask
我测试结果:
/home/javalee/test#perl -e '$array = [1, 2, 3, 4];print $array'
ARRAY(0x804c00c)/home/javalee/test#perl -
$array = [1, 2, 3, 4];print $array;__END__
ARRAY(0x804c00c)/home/javalee/test#
/home/javalee/test#perl -e '$array = [1, 2, 3, 4];print $array->[3]'
4/home/javalee/test#
这个怎么解释呢?:thank

devel

最初由 javalee 发表

/home/javalee/test#perl -e '$array = [1, 2, 3, 4];print $array'
ARRAY(0x804c00c)/home/javalee/test#

这样好象是把内存的首地址打印出来了。。:help :help

seablue

好像是二维数组。
不懂，:help
:p

tojeff

Perl的引用和C的指针差不多，[...]{...}，构造符并不是最常用的，看下面，->就是组成$$的第一个$
/home/javalee/test#perl -e '$array = [1, 2, 3, 4];print $array'
ARRAY(0x804c00c)/home/javalee/test#
ARRAY是引用的类型，可以使用ref()来获得，0x804c00c是内存基址


#!/usr/bin/perl
use strict;
#使用硬引用，直接指向原来数据的地址
my $onenum = 1;
my $scalar = \$onenum;
print "\$scalar 的引用类型:".ref($scalar)."\t值为$scalar"."\n";
my @array = \(1,2,3,4);
#某些人，不要再说这里错了，她等价与 @array = (\1,\2,\3,\4); Perl的东西，很多人永远都学不会，太高深了，所以我不敢大放阕词，如果你得到高手的证明，可以察看《Perl高级编程》第125页
print "\@array 的引用类型:".ref(@array)."\t\${\$array[1]}的值为{$array[1]}"."\n";
#更改一个元素的值，将更改原先地址中值
#重新设置值
$$scalar = 2;
print "更改以后的值为$scalar"."\n";
print "被更改的$onenum的值为onenum"."\n";

#使用复制引用，复制引用是产生副本的
my @nums = (1,2,3,4);
my $array2 = [@nums];
print "\$array2 的引用类型:".ref($array2)."\t值为array2->[1]"."\n";

#更改一个元素的值，不更改原先地址中值
#重新设置值
$array2->[1] = 8;
print "重新设置值以后，值为array2->[1]"."\n";
print "被引用的数组中元素，值为nums[1]"."\n";