弱问一个匹配正则问题

[goregrypeck]

1 $site =~ s/\/$//
这个是什么意思？

2 $$link[2] = Trim($$link[2])

这里的$$是什么意思？

[Aylazhang]

1.
这个是正则替换。把$site结尾是"/" 替换为空。

2.
说明$link本来就是一个指向数组的引用 即 @$link 里还有一些数组元素。 $$link[2]访问的是其第三个元素。如
my $a = [1,2];
my $b = [3,4];
my $c = [5,6];
my $link;
@$link = ($a,$b,$c);
则，$$link[2] 访问的是 $c = [5,6]; 这个元素。

[ExclusivePig]

1 $site =~ s/\/$//
这个是什么意思？

是指s/\/$//，这个正则表达式用于$site, s///是查找替换，$是正则表达式的元字符，是锚定元字符，代表行末的位置，\/是转义字符，代表字符/，因此正则表达式作用就是将$site的文本中，行尾的/去掉。

2 $$link[2] = Trim($$link[2])

这里的$$是什么意思？

如果和C比的话，就是取指针指向的值。Trim则是perl的内置函数，用于去除文本中的空白字符。

[Aylazhang]

perl 没有什么去空白的trim函数。因为自己写太简单了。