my $sth=$dbh->prepare($ins_rec);

     $sth->execute || die "SQL error:$error\n";