Revision c23cb457
Von Tamino Steinert vor 6 Tagen hinzugefügt
| scripts/import_variant_csv.pl | ||
|---|---|---|
| 15 | 15 |
use List::Util qw(first); |
| 16 | 16 |
use List::MoreUtils qw(any); |
| 17 | 17 |
use File::Basename; |
| 18 |
use Encode; |
|
| 18 | 19 |
|
| 19 | 20 |
use SL::DBUtils; |
| 20 | 21 |
use SL::LXDebug; |
| ... | ... | |
| 248 | 249 |
|
| 249 | 250 |
# create farben listen |
| 250 | 251 |
foreach my $farb_csv_file (glob( $opt_farben_folder . '/*' )) {
|
| 252 |
$farb_csv_file = Encode::decode('utf-8', $farb_csv_file);
|
|
| 251 | 253 |
my $farb_csv = SL::Helper::Csv->new( |
| 252 | 254 |
file => $farb_csv_file, |
| 253 | 255 |
encoding => 'utf-8', # undef means utf8 |
Auch abrufbar als: Unified diff
kuw: FIX: CSV-Import-Script: UTF-8 für Dateinamen beachten