-sauoq
"My two cents aren't worth a dime.";

And to throw in one more module, Text::xSV, which was written by our own tilly

TStanley
--------
Never underestimate the power of very stupid people in large groups -- Anonymous

DBD::CSV can see past the line breaks, and will read the Memo field as you intended. I think your best bet is to use the DBI all the way... Something like this:

#! /usr/bin/perl

# Untested, but ought to be close, if not right on.

# Assumes CSV file is called 'people', in /home/me/db.

use strict ;
use warnings ;
$|++ ;

use DBI ;

my $dbh = DBI->connect( "DBI:CSV:f_dir=/home/me/db;csv_eol=\n",
                        { RaiseError => 1 } ) ;

# Get the data out of the CSV file.
my $sth = $dbh->prepare( 'SELECT * FROM people' ) ;
$sth->execute ;
my $data = $sth->fetchall_arrayref( {} ) ;
$dbh->disconnect ;

$dbh = DBI->connect( "DBI:mysql:my_db", 'username', 'password',
                     { RaiseError => 1 } ) ;

# Dump into the MySQL table.
$sth = $dbh->prepare( <<'END_OF_SQL' ) ;
    INSERT INTO my_people
      ( ID, Name, Memo )
    VALUES
      ( ?, ?, ? )
END_OF_SQL
foreach ( @$data )
{
    $sth->execute( $_->{'ID'}, $_->{'Name'}, $_->{'Memo'} ) ;
}

__END__
[download]

Those who know that they are profound strive for clarity. Those who
would like to seem profound to the crowd strive for obscurity.
            --Friedrich Nietzsche

This tool has already been written (and perfected) and most importantly it's sitting on your drive with mysql.

mysqlimport is a standard mysql utility.

It takes just a few minutes to read throught the man page for mysqlimport and setup the command to import your CSV file. Then you can spend you valuable time writing perl code :)

DBD::CSV worked like a charm, don't know why I didn't see it before. DUH!

I first tried mysqlimport, but it has problems with the line breaks in the memo field.

Thanks everyone for your help.