Select Code to Download

/* -*- mode: c -*-
 * $Id: wordfreq.gcc,v 1.5 2001/09/18 17:25:18 doug Exp $
...
    ht_destroy(ht);
    return(0);
}

// -*- mode: c++ -*-
// $Id: wordfreq.g++,v 1.5 2001/07/21 23:51:05 doug Exp $
...

    return 0;
}

// $Id: wordfreq.java,v 1.3 2000/12/17 21:40:53 doug Exp $
// http://www.bagley.org/~doug/shootout/
...
        }
    }
}

#!/usr/local/bin/python
# $Id: wordfreq.python,v 1.9 2001/05/11 17:44:00 doug Exp $
...
    print '\n'.join(["%7s\t%s" % (count, word) for (count, word) in l]
+)

main()

-- $Id: wordfreq.ghc,v 1.2 2001/02/27 04:04:35 doug Exp $
-- http://www.bagley.org/~doug/shootout/
...
                              where (w, s'') = span isLower s' 

       lower     = map toLower

perl -nle"y/a-zA-Z/ /cs; ++$h{$_} for split }{ print qq[$_:$h{$_}] for
+ sort keys %h" theFile
break:1
...
cart:1
case:2
...