On Mon, May 06, 2002 at 02:19:47PM +0200, Philippe 'BooK' Bruhat wrote: > > I don't dare to say it shouldn't be hard to implement, or else Dave > will tell me that I can do it myself... ;-)
Nah. You are a good golfer and your knowledge of Perl is excellent. Even if it's hard to implement, we know you still can do it yourself. ;) Joy, `/anick -- for( $_ ='YtaohrPr akre nte elhce.'; ($i+2)**-1> 2/length; ++$i ) { @a = split /(.)./; @b = split /.(.)/ ; print ( ( $_ = join '', @a, @b ), "\n" ); }