From 22d314ce2d5c2a755ae98112fdfed9879233e194 Mon Sep 17 00:00:00 2001 From: "Fred T. Hamster" Date: Sun, 12 Nov 2023 15:44:51 -0500 Subject: [PATCH] dropping debugging again --- scripts/files/filename_helper.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/scripts/files/filename_helper.pl b/scripts/files/filename_helper.pl index 50b71edc..3be75c78 100644 --- a/scripts/files/filename_helper.pl +++ b/scripts/files/filename_helper.pl @@ -75,7 +75,7 @@ sub glob_list { $match =~ s/\*/.*/g; # replace asterisks with dot star. $match =~ s/\+/\\+/g; # escape plusses. $match =~ s/\?/\\?/g; # escape question marks. - $match =~ s/\|/\\?/g; # escape pipe char. + $match =~ s/\|/\\|/g; # escape pipe char. $match =~ s/\$/\\\$/g; # escape dollar sign. $match =~ s/\[/\\[/g; # escape open bracket. $match =~ s/\]/\\]/g; # escape close bracket. @@ -89,6 +89,7 @@ sub glob_list { if ($possible_name =~ /$match/) { # this one matches so add it. push @to_return, $chopped_filename[0] . $possible_name; +#print "a match on: $chopped_filename\n"; } } } -- 2.34.1