while (my $row = $csv->getline($fh)) {
            $prep = $db->prepare("INSERT INTO $table VALUES (\"" . join('","', $csv->fields()) . "\")")
                    or die "Cannot prepare database " . $db->errstr() . "\n";
            if (!$prep->execute()) { die "Failed to write row " . $db->errstr() . "\n"; }
        }