An old script I found somewhere.  Probably not useful any more.