eduardo has asked for the wisdom of the Perl Monks concerning the following question:

Greetings. I have been looking for a module to (or a Parse::RecDescent grammar) to parse real world "mailing addresses." I have a text file that looks something like:
150 Main Street Nashville, Tennesse 37201 27 Breck Lane #27 Plingo, Maine 44343 1 2nd Av S. Apt 166 Memphis, TN 37373
And whatnot... and I was wondering if there was any modules that had been written to break it up into it's component parts (street, apartment(?), city, zip.)