Here is a script that I found here. I made some changes to get it to work on my system (Xubuntu 8.10 as of Mar 2009). I submitted the changes to the developer, but also decided to post them for anyone that is interested in my changes. I have also included a patch.