for my $table (qw( Widgets201003 Widgets201004 Widgets201005 )) {
    my $q_table = $dbh->quote_identifier($table);
    my $sth = $dbh->prepare("
        INSERT INTO $q_table (
                   moo, baa, cluck
               ) VALUES (
                   ?, ?, ?
               )
    ");
    ...
}