Sunday | November 11, 2012

【間違い探し（超上級）】騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騷騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒 できたらRT

— 間違い探し・難（日々改良します） (@difference_Dbot) November 11, 2012

最近、こういうのを Twitter でよく見かけるわけですが、いつも目を凝らしたあげく見つからなくてストレスが溜まるので、いっそのこと one-liner でやればいいのではと思った。

$ echo "騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騷騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒騒" | perl -CS -ne ' m/^(.)(\1*)(.)(\1*)$/; print $3," at ",length($2)+2," (not ",$1,")\n";'
騷 at 65 (not 騒)

65 文字目にある「騷」が間違いで、それ以外は「騒」のようですね。