use DBI; ... $self->connectdb(connection => "./db/nr1.db"); $self->createtable(table => $joinTable, form => $form1); my $insert = "insert into GITAXNR(gi,ID,quest) select GITAX.gi, GITAX.ID, NRP.quest from GITAX inner join NRP on GITAX.gi = NRP.gi"; $self->do_it(argument => $insert);