$SQL = "INSERT INTO iCDRSbw (rec_num,src_file,src_host,init_status,cdr_day,last_modified,city,state,cname,vname, npa,nxx,ocn,lata,lata_name,pdd,zone_id,cdrs_seq,file_seq,gc_id ) VALUES (?,?,?,?,?,?,?,?,?,?, ?,?,?,?,?,?,?,?,?,?)"; ... ... ... unless ( $sth->execute($rec_num, '$src_cdr_file', '$host','$init_status', '$f[20]', '$f[04]', '$city', '$state', '$cname', '$vname', $npa, $nxx, '$ocn', $lata, $lata_name, $pdd, $f[0], $f[1], $f[2], '$f[3]' ) ) { $now = localtime(time); print "Error inserting: $DBI::errstr\n" if ($LOGERR); }