One quick question. As the data needs to be flattened to an array to insert, is there (in the general case) any benefit in using fetchrow_arrayref? I am doing a similar task to the OP, copying entire DB tables. I have used fetchrow_array, then insert the array using a prepared insert. I would benchmark the two, but in my case the fetch is from an well known online service desk tool providing instant gratification ;) and the variance in performance between runs is large enough to mask any difference between fetching @ or \@.

Cheers,
R.

Why not print and insert in the same loop ?

while( my @results = $table_results->fetchrow_array()){
  print join ",",@results;
  print "\n";
  $sth_insert->execute(@results);
}
[download]

poj

thank you, I am however getting an error when using your method it always complains about the join statement

Use of uninitialized value $results14 in join or string at rdscopy.pl line 92. and I also get

DBD::mysql::st execute failed: Duplicate entry '10157236320140648_1015
+7237405105648' for key 'PRIMARY' at rdscopy.pl line 94.
DBD::mysql::st execute failed: Duplicate entry '10157236320140648_1015
+7237405105648' for key 'PRIMARY' at rdscopy.pl line 94.
[download]

 
##print and insert at the same time
        while( my @results = $table_results->fetchrow_array())
        {
         print join(",",@results);
          print "\n";
          $sth_insert->execute(@results);
        }
[download]

But I do not get that duplicate error when I use the code below, do you know why? Its the same data

while (my $insert = $table_results->fetchrow_array()) {
    $sth_insert->execute(@$insert);
}
[download]