Mathematica 6 has built-in computational linguistics for words, here indicating possible meanings for "break" by giving unique sense tags.

WordData["break"]