qwurx [shmem] ~> perl -le '$_="foe"; s\oe\riend\; print'
friend
qwurx [shmem] ~> perl -le '$_="foe"; s^Toe^Triend^T; print'
friend
qwurx [shmem] ~> perl -le '$_="foe"; s^Woe^Wriend^W; print'
friend
# even this works
qwurx [shmem] ~> perl -le '$_="foe"; s$oe$riend$; print'
friend