Re: Break the 65 chars :-)

I knew I would learn something from you guys, and so far I have :-)

Thanks, everyone :-)


On Mon, 2004-04-26 at 18:27, A. Pagaltzis wrote:
> * Jose Alves De Castro <[email protected]> [2004-04-26 18:36]:
> > #!/usr/bin/perl -l0n
> > /:/;$_{$'.$&}.=" $`,"}{map{s/,$/
> > /;print}%_
> 
> Trivial improvement, for a gain of 5 chars:
> 
>     #!/usr/bin/perl -l0p
>     /:/;$_{$'.$&}.=" $`,"}for(%_){s/,$/
>     /;
> 
> I've tried other clever things, but they all come out longer.
-- 
José Alves de Castro <[email protected]>
Telbit - Tecnologias de Informação