X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=csv_ripper;fp=csv_ripper;h=bf787ffacedea7394885660a6e230800606c5c2e;hp=99e047cd145323a626b5af9225c65a9dbe4bb744;hb=6c25f0626b026e59b9051c31d3eddfb6105f3c56;hpb=1ff6b816fbb3e211b8edf41d75de987fe286f7e4

diff --git a/csv_ripper b/csv_ripper
index 99e047c..bf787ff 100755
--- a/csv_ripper
+++ b/csv_ripper
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 # TODO
-# 
+#
 # * add getopt support
 # * use tag generator to expand list of wanted fields?
 # * insertion of constant-value fields
@@ -14,7 +14,7 @@ use warnings;
 
 use Text::CSV;
 
-my $csv = Text::CSV->new({escape_char => "+", allow_loose_quotes => 1});
+my $csv = Text::CSV->new();
 
 open CSV, '<', shift or die "Can't open file $!\n";