$csv_file = $cfg->val( 'General', 'inputDir' ) . '\\' . $csv_file; my $csv = Text::CSV_XS->new( { binary => 1 } ) or die "Cannot use CSV: " . Text::CSV_XS->error_diag(); open( my $fh, '<:utf8', $csv_file ) or die "Cannot read $csv_file: $!\n"; #### open( my $fh, '<:raw:encoding(utf16)', $csv_file ) or die "Cannot read $csv_file: $!\n";