Comments on: A Problem

By: Sindwiller

Sindwiller — Tue, 13 Oct 2009 10:52:55 +0000

@ Matt Hickford

fsck is just filesystem check :) mtab is metatab, I’d pronounce usr as user, even though it actually means ‘unix system resources’.

By: jo

jo — Mon, 14 Sep 2009 15:16:12 +0000

Here’s the Ruby way of finding anagrams:

Anagram finder in Ruby

http://snippets.dzone.com/posts/show/5593

By: Gonzalo

Gonzalo — Wed, 02 Sep 2009 23:34:59 +0000

@James:

int no_to_return = (argc == 2 ? 1 : atoi(argv[2]));

A ternary definitely is not faster.

By: Brandon

Brandon — Wed, 26 Aug 2009 01:46:52 +0000

interesting rhetoric on the marios…seems everyone has failed to notice that part.

By: Yamthief

Yamthief — Tue, 25 Aug 2009 10:46:49 +0000

Wow. This turned in to a proper ‘geek-off’ really quickly…

…I like it here :)

By: Porges

Porges — Tue, 28 Jul 2009 09:56:46 +0000

Here's my variant: getting rid of almost all the Perl and doing the rest with Unixy programs... only thing left that Perl is required for is sorting letters within a string, which I couldn't figure out how to do simply :)



By: Scott
Scott — Tue, 28 Jul 2009 04:14:46 +0000
oh a couple of weeks late.. oh well:
 perl -l15 -ne ‘push @{$x{lc join”",sort split//}},$_;END{map{print join(” “,length,@{$x{$_}}).”\n”}sort{length($a)<=>length($b)}grep{@{$x{$_}}>1}keys%x;}’
 perl -e’print map{@{$x{$_}}>1&&join(” “,length,@{$x{$_}}).”\n”}sort{length($a)<=>length($b)}map{chomp;push@{$x{$k=lc join”",sort split//}},$_;@{$x{$k}}<2&&$k}<>;’



By: David
David — Mon, 27 Jul 2009 23:49:33 +0000
This should do it in Haskell (composed at the interactive prompt, much easier to play with than Bash), unless I got the problem description wrong:


import Data.Ord

import Data.List

main = interact (unlines . map show . anagrams . lines)
anagrams = reverse

               . sortBy (comparing (length.head))

               . filter (not.null.tail)

               . groupBy (\a b -> sort a == sort b)


Save as anagrams.hs and cat /usr/share/dict/words | runhaskell anagrams.hs



By: Sweth
Sweth — Tue, 14 Jul 2009 16:06:16 +0000
Many months later, this discussion came up in another discussion, and so I came back to look at it again, and saw Randall’s response to me.  So, belatedly, I clarify: that “47″ was actually a “backslash 0 4 7″, which is the pcre octal for the single quote; the “backslash 0″ part apparently got eaten.  If you put that back in, it works (I believe) as Randall intended.



By: FoolishOwl
FoolishOwl — Sun, 12 Jul 2009 22:16:06 +0000
Oops.
cowsay "STACK OVERFLOW" | cowsay -n | cowsay -n | cowsay -n