ActivePerl/MySQL problem with dropping, creating tables

Hi,
I am running ActivePerl 5.8.7 and MySQL 4.1 on a WindowsXP box. It
won't let me drop or create a table through DBI. My code and error message
are attached.

Thanks

Mary Anderson