http://www.perlmonks.org?node_id=846506


in reply to CSV tab-delimited not space-delimited

The solution the other two posted is correct, but to make it even more readable and maintanable:

my $dbh = DBI->connect ("dbi:CSV:", undef, undef, { f_ext => ".csv/r", csv_sep_char => "\t", csv_allow_whitespace => 1, RaiseError => 1, PrintError => 1, }) or die $DBI::errstr; # due to <c>f_ext</c> there is no need to specify the filename! my $sth = $dbh->prepare ("select * from file");

Note however that a TAB is also considered whitespace, so your milage may vary and it may not work at all.

allow_whitespace When this option is set to true, whitespace (TAB's and SPAC +E's) surrounding the separation character is removed when parsin +g. If either TAB or SPACE is one of the three major characters "sep_char", "quote_char", or "escape_char" it will not be considered whitespace.

Enjoy, Have FUN! H.Merijn

Replies are listed 'Best First'.
Re^2: CSV tab-delimited not space-delimited
by mellon85 (Monk) on Jun 25, 2010 at 10:31 UTC
    I have resorted to split/join on "\t" to load, change and store line by line.

    thanks for the help mighty monks