perl -v|perl -pe's\(?<=r)[l]\x\g;s\(?<=pe)r\\gi;s\p(e)\S$1\gi'
perl -MO=Deparse -e 'E S I X G S O O D'

Replies are listed 'Best First'.
Re: Sex !
by QM (Parson) on Jun 22, 2018 at 09:07 UTC
    Now if you can only preserve case...It seems the Viagra never wears off.

    -QM
    --
    Quantum Mechanics: The dreams stuff is made of