Fix results file selection aborting if only a filtered file is present

This commit is contained in:
2026-09-08 10:34:26 +02:00
parent a2746b3f91
commit 6478cadc85
+2 -1
View File
@@ -365,7 +365,8 @@ sub pick_data_file {
# \Q...\E treats ... as literal string # \Q...\E treats ... as literal string
my @files = sort grep { /^\Q$prefix\E.*\.csv$/ } find_files($dir); my @files = sort grep { /^\Q$prefix\E.*\.csv$/ } find_files($dir);
return "$prefix.csv" unless @files > 1; die "No $prefix CSV files found in $dir\n" unless @files;
return $files[0] if @files == 1;
# Make sure the unfiltered file is at the top # Make sure the unfiltered file is at the top
my @sorted = sort { my @sorted = sort {