Hurrah: a decoder.. much borrowed, too much added (scores 105).
#!perl -p
s#\pL+(`\pL*)?#$_=$&;$1||s/(..)(..)/$1`$2/;/`/?($l=()=/../g)&&join'',/([^`])(?=.{$l}(.)?)/g:reverse#eg
Greg
--- Mtv Europe <[EMAIL PROTECTED]> wrote:
> Hello Greg!
>
> [EMAIL PROTECTED] (Greg Allen) wrote:
> > # (1) Only letters will be encrypted.
> > # (2) Words with less than 3 letters will be reversed.
> > # (3) Words with more than 3 letters will be scrambled this way:
> > # * All letters on even locations move to the left-hand side.
> > # * All letters on odd locations move to the right-hand side.
>
> your sample output (those -> toe'hs) clearly shows opposite direction,
> i.e. odds (counting from one) to the left and evens to the right.
>
> > # * A "`" gets between the both sides if the word has more
> > # than 4 characters.
>
> and naive approach is 68, i believe:
>
> -p s#\pL+#$_=$&;/..../?join'',/(.).?/g,'`'x/.{5}/,/.(.)/g:reverse#eg
>
> ---
> Mtv Europe
__________________________________________________
Do You Yahoo!?
Yahoo! Finance - Get real-time stock quotes
http://finance.yahoo.com
