I'm probably going to tackle the same challenge myself sometime soon. I though about it a little this morning during my commute, and so I was surprised to see this posted since it is exactly a question I will need to answer. Here is my suggestion, and what I plan to do, run a "desc table;" query and then parse the second column of each returned row to build a data entry form in a table. I'm sure this is what you are doing? No? basically
if ( $ary[1] =~ /ENUM/i) {
($enums = $ary[1]) =~ s/.+\((.+)\).*?/$1/;
#now $enums contains just "option1","option2","etc..."
#and I can parse this to make the actual <select> html
}
I'll post my code when I'm done if you still need...
Hope this helps,
Jim