X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ffiles%2Ffilename_helper.pl;h=3be75c780d307c2a4f2fb9aa01cf6a941a10a354;hb=22d314ce2d5c2a755ae98112fdfed9879233e194;hp=50b71edc7a626675923fc7f6ffcacc9c92830a9c;hpb=fc9b15898370c68de876d858f126b0da4604d9d0;p=feisty_meow.git 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"; } } }