- or download this
/* -*- mode: c -*-
* $Id: wordfreq.gcc,v 1.5 2001/09/18 17:25:18 doug Exp $
...
ht_destroy(ht);
return(0);
}
- or download this
// -*- mode: c++ -*-
// $Id: wordfreq.g++,v 1.5 2001/07/21 23:51:05 doug Exp $
...
return 0;
}
- or download this
// $Id: wordfreq.java,v 1.3 2000/12/17 21:40:53 doug Exp $
// http://www.bagley.org/~doug/shootout/
...
}
}
}
- or download this
#!/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()
- or download this
-- $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
- or download this
perl -nle"y/a-zA-Z/ /cs; ++$h{$_} for split }{ print qq[$_:$h{$_}] for
+ sort keys %h" theFile
break:1
...
cart:1
case:2
...