Re: Semcarlbd letrtes sepur! (Scrambled letters super!)

Etienne Grossmann <[email protected]>
Newsgroups gmane.comp.lang.perl.fun
Message-ID <[email protected]>
  Thanks for the link, it has a nice discussion. And for the
one-liner; I didn't quite realize one could put all that in a s///e.

  Cheers,

  Etienne


On Thu, Sep 18, 2003 at 12:00:18PM +0200, A. Pagaltzis wrote:
# * Etienne Grossmann <[email protected]> [2003-09-18 09:29]:
# > I hared a sutdy has been dnoe on taht scjebut in an Eigslnh
# > urtiivesny, but I coannt get hold of it. Any ionirmtfoan on
# > that sceujbt is welomce.
# 
# http://www.bisso.com/ujg_archives/000224.html
# 
# > perl -pe 'sub r{join"",map chop,sort map{rand().$_}shift=~/(.)/g};s/\b(\w)(\w*)(\w)\b/$1.r($2).$3/eg'
# 
# perl -pe's/(?<=[a-z])([a-z]+)(?=[a-z])/join"",map chop, sort map rand().$_,$1=~m[.]g/ige'
# perl -MList::Util=shuffle -pe's/(?<=[a-z])([a-z]+)(?=[a-z])/join"",shuffle$1=~m[.]g/ige'
# 
# -- 
# Regards,
# Aristotle
#  
# "If you can't laugh at yourself, you don't take life seriously enough."

-- 
Etienne Grossmann ------ http://www.isr.ist.utl.pt/~etienne
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.