my $ss = $dbh->prepare("
    insert foo(one, two, three) values(1, 2, 3)
    select * from bar
    insert foo(one, two, three) values(10, 11, 12)
   ");
  $ss->execute;