Revision dcd6ce29
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
SL/Helper/Csv.pm | ||
---|---|---|
6 | 6 |
use Carp; |
7 | 7 |
use IO::File; |
8 | 8 |
use Params::Validate qw(:all); |
9 |
use Text::CSV; |
|
9 |
use Text::CSV_XS;
|
|
10 | 10 |
use Rose::Object::MakeMethods::Generic scalar => [ qw( |
11 | 11 |
file encoding sep_char quote_char escape_char header profile class |
12 | 12 |
numberformat dateformat ignore_unknown_columns strict_profile _io _csv |
... | ... | |
39 | 39 |
$self->$_($params{$_}) for keys %params; |
40 | 40 |
|
41 | 41 |
$self->_io(IO::File->new); |
42 |
$self->_csv(Text::CSV->new({ |
|
42 |
$self->_csv(Text::CSV_XS->new({
|
|
43 | 43 |
binary => 1, |
44 | 44 |
sep_char => $self->sep_char, |
45 | 45 |
quote_char => $self->quote_char, |
Auch abrufbar als: Unified diff
Text::CSV_XS wird vorausgesetzt, nicht Text::CSV