$values = $csv->csv (in => $fh, headers => [qw(SortOrder Name Description Category)], encoding => 'UTF-8', );
unless ( $values && ref($values) eq 'ARRAY' ) {
push @results, loc("[_1]: Wrong file format", $filename);
$values = $csv->csv (in => $fh, headers => [qw(SortOrder Name Description Category)], encoding => 'UTF-8', );
unless ( $values && ref($values) eq 'ARRAY' ) {
push @results, loc("[_1]: Wrong file format", $filename);