Remove trailing ; in statements before parsing

perl5-dbi/DBD-CSV#2

https://metacpan.org/pod/DBI#prepare

Some command-line SQL tools use statement terminators, like a semicolon,
to indicate the end of a statement. Such terminators should not normally
be used with the DBI.

Changes

@@ -21,6 +21,7 @@ DBI::Changes - List of significant changes to the DBI
     Ceased to ignore DESTROY of outer handle in DBI::PurePerl
     Treat undef in DBI::Profile Path as string "undef"
         thanks to fREW Schmidt RT#113298
+    Remove trailing semicolon in SQL::Nano parser
 
     Added @ary = $dbh->selectall_array(...) method
         thanks to Ed Avis RT#106411

lib/DBI/SQL/Nano.pm

@@ -76,6 +76,7 @@ sub prepare
 {
     my ( $self, $sql ) = @_;
     $sql =~ s/\s+$//;
+    $sql =~ s/\s*;$//;
     for ($sql)
     {
         /^\s*CREATE\s+TABLE\s+(.*?)\s*\((.+)\)\s*$/is