You're not doing anything with the SQL statements after you push them onto @statement. At the very least, do something like:

foreach my $statement (@statement) {
    if ($db->Sql($statement)) {
        print "Execution failed for $statement\n";
        # die?  Return?  Carry on?
    }
}
[download]