regexp задачка

Для perl-а возможно
@res = $str =~ /((.)\2+)/g
в нечетных элементах @res будут подстроки повторяющихся символов

a+|b+|c+|d+....

сказано же не перечисляя

/.{2,}/

$ echo -e "ba\naa"|egrep ".{2,}" ba aa --- ответ не верный

aa\nb\nbb\nccc\ndfff\nertyua\n регексп не выдаст \тbb, ибо это не повторяющийся символ.

регексп в случае повторяющихся символов выдаст

aa bb ccc ffff

и делается это вот так

#!/usr/bin/perl

$_="aa\nb\nbb\nccc\ndfff\nertyua\n";

print " $& " while m!(.)\1+!isg; print "\n";

> подстроки повторяющихся символов

пусть уж чел определится с тем, что ему нужно, подстроки повторяющихся символов, или сами повторячющиеся символы. ибо из его примера исходного

> echo -e "aa\nb\nbb\nccc\ndfff\nertyua\n"|egrep "$regexp" выдавало aa nbb nccc ndfff

не следует, что "\nbb" является подстрокой повторяющихся символов, ибо в строке которую жрет echo дважды подстрока "\nbb" не встречается. но дважды встречается подстрока "\nb", чего, однако, не написано в том, что должно выдаваться регекспом (у него написано что регесп должен выдавать результат в виде "aa nbb nccc ndfff" )

Да все просто, хочу регексп чтобы соответсвовал повторяющимся символам,

скажем

$regexp='искомый регексп';

$string="aaaf\ndff\nbbb\nrrr\nf\n";

$string=~s/$regexp//

print "$string ---\n";

выдавало что-то типа

af

ndf

nb

nr

nf

---

и другие применения соответсвия подстроки.

ищу именно выражение regexp и интересуюсь возможно ли это, сам много думал на эту тему и ни чего не придумал.

/g естественно