in reply to Re: Substitution of a particular letter in all combinations of positions in word (see inside)
in thread Substitution of a particular letter in all combinations of positions in word (see inside)

... and using the  /r substitution modifier of 5.14+: 

>perl -wMstrict -le
"printf qq{'$_' } for glob('ferber' =~ s{e}{{e,a}}xmsgr);
"
'ferber' 'ferbar' 'farber' 'farbar'

[download]
  • Comment on Re^2: Substitution of a particular letter in all combinations of positions in word (see inside)
  • Select or Download Code

In Section Seekers of Perl Wisdom