Re: putting practice
[email protected] (Rick Klement)
| Newsgroups | perl.golf |
|---|---|
| Message-ID | <[email protected]> |
Mtv Europe wrote: > > Hello Rick! > > [email protected] (Rick Klement) wrote: > > > Routine clean-up to 83: > > > > #!perl -p > > s#[a-z`]+#$_=$&;s/^..(?=..$)/$&`/;/`/?join'',/(\w)(?=.{$- > [0]}(.?))/g:reverse#egi > > aah, this's the challenge for my horse (82): > > -p s#[a-z`]+#join'',@_[(split//,$&)>3?map{$_-1,$_+@_/2- > (@_<5)}1..@_/2:(2,1,0)]#ieg > > --- > Mtv Europe Routine clean-up for your horse too (80): -p $"='';s#[a-z`]+#@_[(split//,$&)>3?map{$_-1,$_+@_/2-(@_<5)}1..@_/2:(2,1,0)]#ig :) -- Rick Klement