2ちゃんねるスーパートラッキングシステム

2ちゃんねるスーパートラッキングシステム (57ﾚｽ)
上下前次 1-新

33: 02/09/22 09:13 ID:??? AAS
#有名な重複文字の正規表現
$/="";
while(<>){
while( m{
\b
(\w\S+)
(
\s+
\1
)+
\b
}xig
)
{
print "$1\n";
}
}