@{ $Hash_filematches{ $filename } } = grep( /\/\Q$file_name\E#/i
+, @{ $Hash_filenames{ $filename } });