怎样查找双写字母的单词，如look,hello

pizzshen

#!perl
@line=`cat tmp`;
foreach (@line) {
        /(.){2,}\1.*/;
        print "$&\n";
}
偶也在学Perl,实在还在入门中：请问上例中\1.*是什么意思，还有$&是什么意思？虽然可以猜，但想弄清楚点啦，谢谢指教哦。

bjgirl

/(.){2,}\1.*/; #\1是perl中的记忆,跟sed的类似
print "$&\n";  #$&是perl的特殊变量,意为完全匹配,于之类似的还有$'和$`

bjgirl

[quote]原帖由 "jigenxiang"]惭愧，shell还在学习中，熟悉中··············[/quote 发表：

perl的正则表达式实在很强大,基本上可以完全替代awk和sed

footfly

skylove 写到:
汗。。。
var=$(echo $i|sed 's/./&\
/g'|uniq -c)

这句看不懂得。。。 s表示替换 .表示任意字符。。g表示全局。。那&表示的意思是？？？ 还有uniq的作用是什么？以前没用过

不知对不对,现没环境测试.正则表达式:
[a-z]{2}

&:附加或修改单个字符;"&\ "应该有个空格吧(猜的)&储存了前面的配匹模式;如:
/pattern-find/& pattern-replace/结果为:
pattern-find pattern-replace;

/pattern-find/pattern-replace &/结果为:
pattern-replace pattern-find;

请问:"(.)1;\1"是什么意思?谁来解释一下.学习shellk中.