in reply to Re: "Countdown" (golf)
in thread "Countdown" (golf)

59 chars... 
#        1         2         3         4         5         6         7
#234567890123456789012345678901234567890123456789012345678901234567890
+123456
@_=sort@_;$"='?';grep{(join'',sort split//)=~m!^$/@_?$!}<D>

[download]

------
We are the carpenters and bricklayers of the Information Age.

Don't go borrowing trouble. For programmers, this means Worry only about what you need to implement.

Replies are listed 'Best First'.
Re3: "Countdown" (golf)
by blakem (Monsignor) on Dec 01, 2001 at 01:28 UTC
    I like it... though the words returned now have trailing newlines. I can move one char from the sub to the command line options, thus improving the score by 1 under normal golf rules. 58 chars 
    #!perl -l

#        1         2         3         4         5
#234567890123456789012345678901234567890123456789012345678
@_=sort@_;$"='?';grep{(join'',sort split//)=~/^$\@_?$/}<D>

    [download]

    -Blake

[reply]
[d/l]

In Section Meditations