my $table_results= $dbh2->prepare("SELECT * from $feed_table WHERE entry_time >= $time"); my $sth_insert = $dbh3->prepare("insert into $feed_table (id_code,entry_time,parent_id_code,author_name,author_code,author_url,author_image+_url,entry_url,entry_types, status_code,entry_text,entry_data,last_update,pull_time,queue_code) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?) "); $sth_insert->execute_for_fetch(sub { $table_results->fetchrow_arrayref }, my \@tuple_status);