Re: Break the 65 chars :-)

* 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.

-- 
Regards,
Aristotle
 
"If you can't laugh at yourself, you don't take life seriously enough."