+ while ( $sep_char =~ m/^\"$/ ) {
+ warn "## skip quote separator ",dump($sep_char);
+ $sep_char = shift @sep_by_usage;
+ }
+
+ if ( $sep_char !~ m/,/ && $possible_delimiters->{','} && $path =~ m/\.csv/i ) {
+ $sep_char = ',';
+ warn "## csv file detected so prefer , as separator";
+ }
+