No, that's 78, the way I count :-|
I'm also counting the #!/usr/bin/perl part...
I guess my solution is then 49 chars long... right? :-| (that is, taking
off the 16 chars I'm also counting)
jac
On Mon, 2004-04-26 at 16:59, Allen, Greg wrote:
> 61?
>
> -pl /:/;[EMAIL PROTECTED]'}},$`}for(keys%G){$"=", ";s/$/: @{$G{$_}}/
>
> Greg
>
>
> -----Original Message-----
> From: Jose Alves de Castro [mailto:[EMAIL PROTECTED]
> Sent: Monday, April 26, 2004 3:55 PM
> To: [EMAIL PROTECTED]
> Subject: Break the 65 chars :-)
>
>
> Try to do this in the least amount of characters possible :-)
>
> Sample Input:
>
> root:admins
> administrator:admins
> me:users
>
> Output:
>
> admins: root, administrator
> users: me
>
> My current solution is now on 65 bytes (that's the size of the whole
> script), but I guess more experienced golfers than me will probably
> manage to do something smaller... :-)
>
> Happy hacking ;-)
>
> jac
--
Josà Alves de Castro <[EMAIL PROTECTED]>
Telbit - Tecnologias de InformaÃÃo
