Delete All Emails in a Highrise App

How do I delete all the emails in my highrise app? I don't want to delete the entire thing and start over, I've got companies and tags and metadata. What's the easiest way?

This question paraphrased from Tibor Holoda's question on GetSatisfaction

From stackoverflow

• It looks like this is available through the API, and should be easy with the ruby bindings:

  #!/usr/bin/env ruby
  ENV['SITE'] = "http://passkey:X@my.hirisehq.com"
  require 'highrise'
  Highrise::Person.each do |person|
    person.emails.each {|email|
      email.destroy
    }
  end