Поиск слов с ЛЮБЫМИ повторяющимися символами

Ищем лайнер perl one -, который найдет все слова со следующим шаблоном:

X(not_X_chrs)X(not_X_chrs)X    e.g. cyclic

Для одного символа это легко, например.для «а»

perl -nle 'print if /^a[^a]+a[^a]+a$/' < /usr/share/dict/web2

но я хочу найти ЛЮБОЙ символ, поэтому ищу одно регулярное выражение для поиска всех слов, таких как:

azalea   #repeating a
baobab   #repeating b
cyclic   #c

и так далее..

попробовал это:

perl -nle 'print if m/^([a-z])[^$1]+$1[^$1]+$1$/i' </usr/share/dict/web2

но не работает.