With all yer bitchin, you might have been done doing it manually by now ;)
Or, you could have spent 5 minutes in Google and come across [link|http://groups.google.com/groups?q=perl+access+dbi+structure+%22create+table%22&hl=en&lr=&ie=UTF-8&selm=nfCu7.20025%24DJ3.1619578%40nlnews00.chello.com&rnum=3|this]. Maybe with a little lovin, it would give you the SQL you need to recreate your DB wherever the hell you want, indexes and all.