perl中“->”的用法

2024-11-16 20:38:29

推荐回答（3个）

回答1：

不能去掉，->代表的是取引用，数组 @a=(1,2,3), $a[0]=1 写成引用形式是$a=[1,2,3] 因此 $a->[0]=1, $RefCurrent是数组的引用类似于[1,2,3]， @{$RefCurrent} 就是把引用转为数组，类似于@a, $RefCurUnit 就是数组@{$RefCurrent}中的一个元素，而这个元素本身又是一个引用。

回答2：

$refcurunit 是一个指针，－〉可以理解为取值，$ref->[2]->[3]...就是你想像中的$ref[2][3]

回答3：

（1）/c表示把匹配不上的字符进行替换.
$temp="AAAABCDEF";
$count=$temp=~tr/A/H/c;
print "$temp\t$count\n";
结果：AAAAHHHHH 5
（2）/d:表示把匹配上的字符全部替换
$temp="AAAABCDEF";
$count=$temp=~tr/A/H/d;
print "$temp\t$count\n";
结果：HHHHBCDEF 4